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前 号 の 予告 どおり ボケ コ 
ン の 堀川 くん が ファ ミリ 
ー ツ se グ W 3 で 、。 帳 
ー ル プレ イン グ ゲ ー ム を 
作っ て し まっ た の だ っ . ん 


・200 


OoTHE Oo 超 必殺 プロ グラ ム 
PUZZLE 人 / ) 
よ ょ 本 も 1M プ ラ 味 ッ 
二 2 8) ・ 財 5 が プ 
5 Em 諾 
を 訂 に 。 思 0 5 0g が WW 5 / 
ー 138 XY うー て X4 。 : ー s。 
楽 ル は めん 5 RI から 
し な グ ム ん SS CHAIN: X ま V+Z :EXEC &HF 身 キ ? の 
和信 Rgtoxco 蘭 ) : 
すす と で は AB:NEXT 1:NERGE :L=LE を ス 上 


ナー / 
00 フ ァ ミ ゾー 

Go 空手 
ポケ コン と は いえ 、P B ユー ザー は が ん ば っ て いま す 。 空手 の 
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4 まま HE PUZZLE 2 2808200 
- NIGHT DRIVE_ 
レー 
2 
POKEN 
- COMING BIRD 


00020 人 KC09650O の 5090 


2 たま ジス ルイ: ト 
WM に 

田 パ ソコ ン 笑 殺 / 
わび さび の 逆 有 舞  . 還 軒 詳 較 区 
. SPACE SPACE SPACE 
- バンプ の あっ ば ら 【 ま ら ば ー 
- OPEN YOUR E EYES 

_ CAPS 

ボード パ ニ 

義 2 

- 競 二 mimi 
数 あて ゲー ム 
放物線 アタ ッ ク 
超 必 殺 フ ログ ラム 


今月 の お て まみ ププ レイ バッ ツク ・ チ ェ エッ フフ ボ イン トノ バグ 通信 
募集 デブ ラム 総理 大 臣 発 表 / / 今 月 の プラ ム 


* ] X1turbo model20, 30 の BASIC(SHARP Hu-BASIC CZ-8FB02) で この 本 
の X1 の プロ グラ ム を 入力 し た り 走 ら せ た りす る と き は 次 の よう に し て くだ さい 。 
BASIC を 立ち あげ る と 自動 的 に "Start up.Bas "が 読み こま れ ま す が 、 この と き H 
ELP キ ー を 押し つづ け て いる と 、“NEWON" と 表示 され る の で リタ ー ン キー を 押し 
ます 。 そ し て 、KMODE0:KLIST0: WIDTH80, 25, 0, 1: CONSOLE 0,25 と 入力 する 


| 


| 


| 
| | 


PT 


| 


上 」 


ーー マー シーン ーーーーーーー 


| 


| 


メグ 


| 
| 


| 
| 


[ 


| 


L_ | | | し | | | | | | 証 2 当 
| | | | | 壮 宙 
-_| | 敵 


ms 


※ そ の ほか ガ 欄 外 の 「 突 然 ゆ みち ゃ ん 」「 ボ シッ ト 裏 面 場 」( ゆみ ちゃ 
ん トマ ト 」。 が ガ 大 好評 で す 7「 ボ シェット 告知 版 も よろ し く ぐ / 


こと 。model10 の CZ-8CB02 の 場合 は 、 こ の 入力 の みて OK で す 。 

* 2 PB-100/100F/110 十 増設 RAM、PB-200/300/400/410、FX-700P/710P/ 
720P/780P/802P/820P 

x 3 MZ-1500 用 の Hu-BASIC( 別 売 ) を 用 いれ ば 、MZ-700 用 の プロ グラ ム も 動 
きま す 。 た だ し 、BALLOON BOMBER で は 多少 の 修正 が 必要 で す ( 詳 し く は 本 文 )。 


う 


@ 時 間 が な い / 爆弾 が 破裂 する まで あと 少し / 


FOR PC-8007 リース / 
8807 シ リー ス 


M-BAS/C 


す ょ 
す ょ 
すま 


仙 時 限 爆弾 が チッ チッ チッ 
キミ ん ちの 旋 に 突然 、 何 の 前 


すま 
3 
すま 
7 


や 
ナ ネ 
チ 


ナチ 『 
す よ 


クリ ン 2 号 ” を あや つり 、 料 弾 処理 
へ と 向かう の だ っ た 。 

マジ ッ ク リ ン 2 号 は 、 例 の 円 マ 
ー ク (\) [1121315| キ ー で 上 左 
右 に 動か し て 、 時 限 付 置 ( 倫 ) ぞ 取 
っ て し まち う 。 時 限 装置 を 囲ん で 


1 WIDTH49,25:CONSOLE9 、25.9,1:DEFINTA-Z:H=Bg 
2 J$=CHR$( 29 )+CHR$(29 ) +CHR$(31) : B$(9)=" エ "リキ J$+" ト "BS(1)=" イ リキ J$+" Ed " 

3 DEFFNP(X.Y)=PEEK( 8&HF392+Xx2+Yx120):X=19:Y=19:S=9:X1=19:Y1=19:C=9 

4 PRINTCHR$(12) :BEEP:LINE(9,1)-(38.24) ."+",4,BF:LINE(9,1)-(38,24) ," 還 ",5,B 
5 B=RND(1)x19+1 
6 
2 
8 
9 


COLOR7: LOCATE1 .9:PRINTUSING" SCORE 作 手持 韻 持 9 日 1-SCORE 村 拉 料 寺 "1S, 昌 H 

BX=RND( 1 ) x33+2: BY=RND( 1 )x19+3:FORT=1TO59 

COLOR7 :LOCATE29.9:PRINTUSING "TIME 拉 拓 "1T 

CN=RND( 1)+.5:COLORCN+ 1 :LOCATEBX , BY : PRINTB$(CN) : 
BEEP1:BEEP9:K=INP(9):VX=(K=253 ) -(K=247 ) :VY=(K=223) -(K=251 ) 
X=X+VX:Y=Y+VY:IFFNP(X,Y)=135THENX=X-VX:Y=Y-VY 
P=FNP(X、Y):COLOR4 :LOCATEX1 .Y1:PRINT"+" 5:COLOR6 :LOCATEX ,Y:PRINT"\": 
RESTORE18:IFP=236THEN16ELSEIFP=237THENX=X-2:Y=Y-1:GOTO18 
IFP=145THENX=X-2:GOTO18ELSEIFP=225THENX=X- 1 : Y=Y- 1 : GOTO18 
IFP=227THENX=X-3:Y=Y-1:GOTO18:ELSEX1=X:Y1=Y:NEXTT:X=BX-2:Y=BY- 1 :GOTO18 
BEEP1:S=S+1:C=C+ 1 : BEEP9 :COLOR 4:LOCATE BX、BY+1:PRINT"+": 
IFC=BTHENS=S+(59-T ) : GOT04ELSEGOTO06 
COLOR2:FORA=9TO2:READC$:LOCATEX ,Y+A:PRINTC$: :NEXT :DATANI11 ン 一 BON-, ノ 111 ト 
FORI=1TO59 : BEEP1 : OUT81 ,33:OUT81 , 34 : BEEP9 : NEXT 

RESTORE21:COLOR1 :FORA=19TO12:READC$: LOCATE3,A:PRINTC$: NEXT 

DATA ゴ 。 4 箇 - 個 男 。 画 画 男 圏 男 男 ト , 較 題 回 較 較 還 一 回 還 較 と ど 画 一 回 ア 
DATA 騰 回 男 問 回 胡 。 一 開 圏 / 還 較 い 、:IFS>HTHENH=S 

COLOR6 :LOCATE15.15:PRINT"PLAY AGAIN to any KEY":IFINKEY$ く >" "THEN3ELSE 23 


本 


計 ュ 『 
チ ょ 。 
エキ 


> li さ 
0 
ナ 


す 


エ 
チチ ょ 
エ 
テ 可 
エ 
+ 
す 
す + 
そ 
ナ す ょ 


いる カバ ー に 触れ る と 、 爆 発し て し ま 
う ので 注意 。 ま た だ 、 爆 弾 が 育 く な っ た 
と き に 取ら な いと 、 や っ ぱり 爆発 し て 


し まう 

何 個 か 爆弾 を 撤去 し て し 
まう と 、 ボ ー ナ ス が も ら え 
る よ 。 ち な み に 、 爆 弾 の 爆 
発 時 間 は TIME50。 

これ は すご くむ か し っ ぱ ぽ 
ぃ い ゲ ー ム だ けど 、 でぶ 大 先 
生 い わ く 〈 く 「 単 純 な キャ ラク 
タ を 使っ た ゲー ム ほ ど 、 ゲ 
ー ム と し て は 完成 され て い 
る も の だ 。 なぜなら 、 キ ャ 
ラク タ の お も し ろ る に 頼る 
も の 0 いあ が らい だ ぷう や 。 
還 参 考 一 「 森 r5 尚 の BA- 


SICMAGIC」( 電 波 新聞 社 ) 
画 変 数 リス ト 。 P……P(z.) の 値 。 B$ お …… バ フ ダ ン キ ャ ラ っ 湖 バフ ダン の 表示 
H…… ハ イス コア 、* 征 … 時 間 ・C$……GAME OVER 一 * の 文字 列 ・10-12 マジ ッ フ リン II の 表示 ・ 移 動 
S…… ス コア ・CN-…… 旭 弾 制御 用 ( 調 赤 か) ・ 加 プロ ブラ ム の 説明 ・13-15 バフ ダン と つた か の 判 定 
日 ……: そ の 面 で と る 時 限 バ フ ダ ン の 数 * X.Y…… マ ジッ フク フリン II の 座標 ・ 1 一 5 初期 設定 と 画面 作り ・16-17 バフ ダン と つっ だ と き の 処 理 ・ 得 
C…… 取 つ だ 時 限 パ バフ ダン の 数 ・BX.BY…… 紹 弾 の 座標 胡 得点 表示 点 
P(&.)……V-RAM の 内 容 を 読み 込む 関 。 K…… キ キー スキャン 用 e: 7 バクダン の 座標 設定 。18-23 ゲー ム オ ー バ ー 処 理 

数 ・X1.Y1…… 前 の マジ ッ ク フリ ン の 座標 "* 8 タイ ム 表 示 s 


〈⑤SHORT TIME〉 バク ダン の 足 み だ いな や つが な いと ころ が 1 ケ所 ある ひら 、 そ こら 、 し ん に は いる と その バフ ダン 
は 、 オ ダ プ ツ 。 で も すぐ 次 の バフ ダン が 発生 する か ら 切 いで ネ ! し ん より 行き すぎ る と 爆発 する か ら 注意 し て これ ! 


えん えん と 果て し な く 続 く モ ビル スー ツ の 戦い / 


一 変数 リス ト 


FOR PC-880! シ リス 


M88 BAS/C 


信箱 庭 の な か の モビ ルス ー ツ ウォ ー 
214I6I8| で 、 戦 闘 メ カ ・ フ ァ イ タ ー 
を あや つり 、 敵 マル ク 軍 の 戦闘 機 ザ ル 


1 CLEAR,&HB9FF:DEFINT A-Z:WIDTH 49,25:CONSOLE 5,,9,1:L=8HBA99:DEF USR=L:DEF USRI 
=L+5:DEF USR2=L+19:DEF USR3=L+15:DEF USR4=L+193:DEF FNP=RNDx13+5:FOR Il=L 10 L+13 
7:READ A$:POKE I,VAL("&h"+A$) :NEXT:COLOR=(9,1) (1.6),(2.9):PAINT(9,9),2:E=31 
2 LINE(128,39)-(511,159),9,BF:FOR I=@ TO 399:Q=USR4(9) :NEXT:X=12:Y=X:BEEP:BEEF 
3 T=RNDx1:A(9)=E:B(9)=FNP:C=FNP:B(1)=C:B(2)=C:B(3)=B:A(1)=8:A(2)=E:A(3)=E:0=640 
4 IF POINT(Xx16+15,Yx8+4)=1 THEN COLOR 2:M=X:N=Y:GOSUB 9:Q=USR(Xw2+Yx0) :GOTO 19 
5 I=INP(9):V=(!=239)-(I=191)+(1=235)-(1=187)+(X>25)-(X く 9):W=(INP(1)=254)-(1=251) 
-(1=235)-(1=187)-(Y く <6)+(Y>17) :Q=USR(X*2+Yx0) :X=X+V:Y=Y+W:Q=USR1(Xx2+YxO):IF INF( 
9)=191 AND Z=9 THEN BEEP 1:M=X+1:N=Y:Z=1:BEEP 9 ELSE Q=USR4(9):COLOR 7:GOSUB 11 
6 GOSUB 11:IF R=3 THEN R=9@:FOR Il=9 TO 3:C(I)=9:NEXTEGOTO 3:“ [By Ochiai] 
7 ON T GOTO 8:H=199:U=9:A=A(U) :B=B(U) :Q=USR(Ax2+Bx0) :A=A-1:B=B+SGN(C-B):IF A=8 T 
HEN 3 ELSE Q=USR2(Ax2+Bx0):A(U)=A:B(U)=B:IF RNDxX<2 THEN C=FNP:GOTO 4 ELSE 4 
8 H=19:U=RNDx2+1:IF C(U)=9 THEN A=A(U) :B=B(U) :Q=USR(Ax2+Bx0) :A=A+SGN(X-A) :B=B+SG 
N(Y-B) :Q=USR3(Ax2+Bx0):A(U)=A:B(U)=B:GOTO 4 ELSE A(U)=9:B(U)=9:Q=USR4(9):GOTO 4 
9 FOR J=9 TO 29:BEEP 1:Q=USR4(9) :CLS:LOCATE M,N:PRINT"X":BEEP 9:NEXT:CLS:RETURN 
19 LOCATE 15,12:PRINT "GAME OVER":Q=USR4(9):IF INP(1)=127 THEN BEEP:RUN ELSE 19 
11 IF Z=1 THEN IF M>29 THEN Z=9:CLS:RETURN ELSE CLS:M=M+1:LOCATE M,N:PRINT"- "1F 
POINT(Mx16+8,Nx8+4)=1 THEN COLOR 2:Z=9:FOR 1=9 TO 3:IF MsA(I) AND N=B(I) THEN A 
=A(1):B=B( TI):C(I)=1:IF T=9 THEN R=2 ELSE 12 ELSE NEXT ELSE RETURN ELSE RETURN 
12 GOSUB 9:Q=USR(Ax2+Bx0) :S=S+H:LOCATE 15,4:COLOR 7:PRINT"SCORE"S:R=R+1:RETURN 
13 DATA 11,99,1,18,D,11.37,BA,18,8,11.47.BA,18,3,11.57,BA,F3,ED,73,33,BA,31 ,,C9。 
7E,23,66,6F,39,31,4E,,1,FF,8,D3,5C,EB,ED,A9,ED,A6,EB,39,19,F7,D3,5F,31,,,FB,C9,2 
3,89,13,C9,D,CE,D,F8,3,C9,6,E9,E,79,1C,E9,,。」」,7,,9E,1F,FF,FB,8C, ,3F 。 。 。 」,22。A2 
14 DATA 1D,5C,2A,AA,55,D5,2A,AA,1D,5C,22,A2,F3,D3,5E,21,91,EF,11,99,EF,3E,8,1,2F 
ED,B9 ,F5,ED,5F,12,F1,1,21,,9,EB,9,EB,3D,29,EC,D3,5F,FB,C9:′ くく 2f アイ ター ッ > 


ジ 、 誘 導 浮遊 機 軍 ジグ も ミサ イル で や 
2224 よう 。 
ー で 前 方 に の み 発 射 さ れる 。 

で 、 な に し ろ 1 画面 ども ん ね 。 キ アァ 
ラク タ も それ っ ぱく 設定 し て ある し 、 


スク ロー ル も シュ ルン シュ ルッ と や っ て 


・C( )……: 選 ば れ だ 敵 を 破壊 し だか ・ 4 ゲー ム オ ー バ ー の 判定 
YY…… ファ イタ ー の 座標 * ループ 用 、 キ ー 入 力 用 ・ 5 ファ イタ ダー 物 動 、 ミ サイ ル 発 射 ガ ・ 
A( ).B( )…- 敵 (ザル ジ , ジグ ) の 座標 ”。J…… ル ー プ 用 。 6 全て の 敵 を 破壊 し た か 
M.N…… ミ サイ ル の 座標 ・ 昌 …… 増 加 す る スコ アー 2 ザル ジ の 物 動 5 
B…… 災 に 動か す 敵 の 座標 *・S…… ス コア ー ・ 8 ジグ の 移動 ・ 
V.W…… フ ァ イ タ ヤー の 物 動 量 ・ 〇 ……USR 関 数 用 et ミサ イル の 比 発 e 
RE 敵 ( ザ ル ジ ) の 向かう Y 卒 標 ・A$…… デ ー タ 読み 出し 用 『 人 0 ゲー ム オ ー バ ー 6 
ー… 災 に 動 の す 敵 の 種類 ・ し ……&HB000 ・11 ミサ イル 処理 
ーー 敵 ナ ン バ ー 。 主 プ ロブ ラ ハム の 説明 2 スコ ア 表 示 
Z…… ミ サイ ル の フラ グ ブ *1-2 初期 設定 、 画 面 作 成 ・13-14 マシ ン 語 、 キ ャ ラフ クタ デー タ ・ 
ー… 敵 (ジブ ) を 破壊 し だ 数 ・ 3 敵 の 各種 デー タ 設 定 ・ ・ 


つ だ に 書け な いこ と を 書い て し まつ だ 。 い や ーー 満足 満足 。 


ミサ イル は 。、 ス ペー スキ 


を し 。、 ラー も b、 ゲー みみ は 
じ め る まえ か ら 感 じ て し 
ま 

で 、 ち ょ っ と あれ な の 
が 、 判 定 。 作 者 自身 が 日 
状 し て いる あみ けれ と ど 。 そこ 
は それ 、 3 次 元 的 に よ け 
た あみ だ と 考 ん て 0。 

リプ レイ は [RETURNI。 


・ 画 マシ ン 語 の 解説 


キャ ラク DATA 番 地 設 
定 

キャ ラク 表示 ル ー チ ン 
ファ イタ ヤー の キャ ヤラ DAT 
A 

B04AーB059 ザル ジ の キャ ラ DATA 
B05AーB069 ジグ の キャ ラ DATA 
B06A 一 B08D 地面 の スウ ロー ル 


B000 一 BB014 


B015 一 B039 
B03A 一 B049 


〈 ス カイ ファ イマ ー〉 は つき り 言 つっ て この ゲー ム 大 好き で す 。 は じ め て や つ だ 時 に と て も 長 一 くべ や つて いら れ だ か ら で す 。 め 7/ 


洋 /05g7005- つ ゴ 一 テー ビワ と ン ロ ン 司 層 / ⑯ 


@ い つか は きっ と 必ず アウ トノ 

私 は 「 で ぶっ ちょ DRAGON」。 何 も 
代わ な な く て も 天 る て し まう と いう 抽 沿 
体質 の 持ち 主 、 そ の くせ 非常 に きれ い 
好き 。 少 し で も 変わ っ た も の に 触れ る 
も の 0② 陣 生き 。 ス グロ セール し て くる 美 
物 に 触れ な いよ うに DRAGON を あや 
の つつ て 

ドラ ゴン は カー 
ソル キー で 8 方 向 


フク フウ ッ 、 ブ プク ブ プク ッ と ドラ ゴン が 太る / 


FOR PC-6007 シ リス / 
660J シ リース 


M60 BAS/C 76K PAGE 2 


及 後田 褒 軸 BN 

没 に な る の は 残念 。 

で も 改良 すれ ば …… 

パソ コン 歴 4 年 。PC-600Im ッ フ ウッ > 
k HI と エプソン の HC-88 を 持 夫 条 3 
- て いま す 、 き て 、 こ の 「 て 。 どり 衝 

ぶっ ちょ DRAGON」、 実は 2 チ こ に なる: 


重 投稿 な の で す 。 と いっ て も 、 
投稿 先 は 同じ テク ポリ 。 要 す 
る に 流 作 を 手中 し し た の で す 。 


スペ ー ス キー を 押す と 移動 距離 が 2 倍 
に な る 。 テ クニ ッ ク 次 第 で は 、 異 物 を 
と ひこ えた える こと も 6 で きる と いう 身軽 な 
ヤツ 。 で も 、32 回 スク ロー ル す る ご と 
に プク ッ 、 ブ クッ と 太っ て 、 ゎ 一 気持 
ち わ る 一 い / グ 異物 が 体 の ぼ こ に あ た 
っ て も 、 ま ただ 、 自 分 で 自分 の 体 に あ た 
の も 90250 て し まう 。 ええ そこ / 0 あ 
死ぬ 人 の を 待つ ば か り じ ゃ な いか ググ 
DK の す 。 は だ し て 、 寺 そ さ は さこ 
EE の スク ロー ル て 、 ど こま で だ えら 


19 SCREEN2,2.2:CONSOLE,,9,9:CLS: 
XA=&HE39F:M=-1:K=255:LOCATE 9,15 
Z9 FOR =9 TO 8:READ X(I):NEXT:D 
ATA_ 9,-32。-31 。1,33,32,31 。-1,-33 

39 K=K+6:TF K>255 THEN PLAY "o5b 
64a64964":M=M+1:K=1:SOUND 9,6 

49 POKE &HE3FF-RND(1 )x32,K:Z=X(S 
TICK(9)):IF STRIG(9) THEN Z=Z+Z 
59 PRINT:X=X+Z:IF X<&HE299 OR X> 
&HE3DC THEN X=X-Z 

69 FORI=9 TO M:A=A+PEEK(X+I ) :NEX 
TTF A>9 THEN PLAY"o2c":GOTO 89 

79 FOR I=9 TO M:POKE X+I,255:NEX 
TiS=S+1:S0UND 2,K:GOTO 39 

89 FORI=9 TO M:POKE X+1,89:NEXT: 
PRINT CHR$(11)1 "SCORE"iS:END 


画 変 数 リス ト < 上 ルー プ ・ カ ウン タマ ・40 画面 最 下 行 に 異物 を 表示 し 、 カ ー ソ 。 何 ひ あれ ば 80 行 へ 


X…… ド ラゴン の 位置 ・ 画 プ ロブ ラ ハム の 説明 ・ ルキ ー の 状態 か らち 、 ド ラゴン の 物 動 * 70 ドラ ゴン の 体 を 表示 し 、 効 果 音 を 変 
M-…… 面 数 。10 初期 設定 ・ 距離 を 導き 、 さ ら に スペ ー ス ・ バ ー。 え 30 行 へ 

K…… 8 ずつ 増え る カウ ンタ マー 。 20 ステ ィ ッ ン 関 数 用 デー タテ ー ブ ル 設 * が 押さ れ て い だ ら 距離 を 倍 に する 。80 ドラ ゴン の 死骸 を 表示 し 、 画 面 最上 
X( )……STICK 関 数 用 。 定 ・50 スク ロール させ 、 ド ラゴン の 移動 位 ・ 段 に スコ ア を 表示 し て 終了 

2…… ド ラゴン の 物 動 距 医 ・30 変数 に を 8 プラス する 。 に K が 255 を ・ 置 を 調べ る 。 画 面 の ら は み 出 し た ら ・ 

A…… 画 面 PEE に 用 ・ 超え た だら 音 を 只 ら し 面 を 進め て 、K* 移動 距離 を ゼロ に する 

Go スコア 。 を 1 に 戻す ・60 ドラ ゴン の 表示 位置 の 状態 を 調べ 、・ 


[ 、 ボリ ェ ッ ト a2 ア ン ケ ー ト 当 朋 者 発表 / 〉 前 号 で アン ケー ト の 業 書 が 1000 履 以上 に な っ だ 場合 は マイ パコ カセ ツ ト テ ー プ を 舎 の 40 る に 
ざ .-(④・ 全 公 o 必 あげ ちゃ うと 約束 し だ よね 。 な 、 な 、 な ん と 1000 枚 突破 し た の で 一 す 。5 月 0 日 現在 1100 枚 。 ほり と うに どう も あり が と う 。 
-・⑨・ 生 僚 o4 


@ え いっ / 出し ゃ ば る くい は みん な 打っ ちゃ う ぞ / 


FOR PC-6007 リ ー ス / 
6607 ミ リー ス 
M60 BAS/C 】6K PAGE 2 

@ 作 者 か ら の 手紙 を 読ん で ./ 

「RUN す る と 上 の ほう に UEFO が 出 て 

きま す 。 こ れ が 自分 。 下 の ほう から は 、 

青く 、 丸 いも ん が ば こ 


且 司 多 錠 了 

キ っ 、 そ うい うわ け て 、 
ここ ・| aw ee 

この ゲー ム を 作っ た の は 、 キ ャ ラ を 重 
ね て 遊ん で いる と き に で きた UFO ( こ 
の ゲー ム の 自分 ) に 感動 し た か ら 。 投 稿 し た 理由 は 、 
P 6 の 1 画面 で SCREEN3 を 使っ た も ん が 少な い 
か ら 。 と ゆー の と P 6 の 1 画面 に GOSUB を 使っ た 
プロ グラ ム を の せ た か っ た か ら 。 と いう いい か げん 
の か た まり の よう な も の で の る と は 思わ な か っ た 。 


一 変数 リス ト ・ 弄 プロ ブラ ム の 説明 
X……UFO の X 座 標 ・ 0 初期 設定 
|…:UFO 物 動 用 。 1 3 UFO の 移動 
is ス 招 ・ 4 一 5 婦 弾 表示 
R…… 敵 が 現れ る と ころ ・ 6-- 7 瑞 の 増殖 
B…… 曲 弾 の Y 座 標 6 GAMEOVER 


mt 


ぼ ぽこ 出 て きま す 。 これ が 敵 。 この 、 
丸い も ん が UFO の いる と ころ と 上 同 
じ 高 きま で 伸び て くる と 死に ます 。 カ 
ー ソ ルキ ー て で て 左右 に 動い て 、 ス ペー ス 
バー で 爆弾 を 落と し て 締 し て 《 だ さい 
と どんだけ 長 てく 生き の びら れ だ か が 、 ス 
- こ な り ま す 。 リ プレ イ は 、 STOP 
和 048 
トー リー は ご ざー ませ ん 。」( 作 者 の 手紙 ) 

ド か ひめ ポコ ボコ ヨ 出 て 《 る キャ ラク 
は 、 ち ょ うど 棒グラフ の よう に 伸び て 
くる の で 、 そ れ を くい に 見 て 、 タ イト 
ル が 決定 され だ ん だ ろう な 。 

る で こ で 、 エ うい う の は と すう か な 。 分 
則 My つ KK だ ん だ け と (の わい "だ に は 
旅 を させ よ 」 と か 「 大 も 歩け ば …… 」 
な ん て こと わ ぎ を ゲー ム に する の ,。 も 
し 、 そ ん な の が いっ ぱい きた ら 、 こ と 
わき シリ ー ズ て まとめ て みよ うか な 。 


9 DIMA(14): 人 = 5: CONSOLE,,,6: SCREE 
N3, 2 ,2:A$=CHR$( 29) :COLOR3,1:CLS 
1 COLOR1:LOCATEX,2:PRINT TX"A も "@" 
A$"ー"EPLAY"N55)64" 1=ST1CK(9 ) 
2 X=X+( =7ANDX>1 )- (1=3ANDX く 14) 
=S+1 :COLOR4:LOCATEX,2:PRKINTTX 
3 COLOR2:PRINTA$"@"A$1 ECOLOR3:PR 
INT "ご ":GOSUB6: IFSTRIG(9)=9THEN1 

4 FORB=3TO15-A(X):COLOR4:LOCATEX 
B:PRINT"・"A$ も 5 ECOLOR1 EPRINT "人 

5 PLAY"N59j64":NEXT:A(X)=A(XX)-SG 
N(A(X) ) :COLOR3:GOSUB6:GOTO1 

6 RsRND(1)x14+1:A(R)=A(R)+1:LOCA 
TER,15-A(R):PRINT"@":COLOR4 

7 ON-(A(R)>12)GOTO8:RETURN 

8 PRINTCHR$(11) "SCORE"S:GOTOS 


い 


ト 】 


嘱 /0997009- つ ゴ 一 テー ビ ツ ウン ワ ロン 契 必 / 


@ こ こ は ご どこ や あな た は だ れ や わた し は カイ 人 … 


/ 


( 


ん 


人 
V 


衝 N 


W 


MM 


り 


FOR FM- グ MEW グ ZZ 


AN 

「| 
サー ) 
1 


wi 


WIDTH69.25:RANDOM1ZETIME:DEFINTA-Z:DIMA(53) 、B(53) .C(53) 、H( 27.11) . 有 (26 ) .Z( 26 ) 
L=9:Q=5:FORI=9TO53:READE.F:A(T)=E:B(T)=F:C(T)=9:NEXT:DATA16383,16382 
Ks=0:CLS:SYMBOL(99.53), "イス "13.5、6:FORT=1T026 :FORJ=1TO19:H(T.J)=9:NEXTJ, 1 
X=13:Ys=5:H(X,Y)=3:FORI=9T027STEP27 :FORJ=9TO11:H(1、J)=3:NEXTJ. 1 :CLS:FORP=9TOQ 

S=RND( 1 )*25+1 : 和 T=RND( 1 )*9+1:PUTQA(Xx24-21 、Yx16)-(Xx24-4.Yx16+15) .B、PSET 

IFH(S,T) く 20THEN5ELSEU(P)=S:Z(P)=T:IFP く <5THENH(S、T)=1:NEXTELSEH(S.T ) =2:NEXT 

FORT=0T022STEP22 :FORJ=9T072STEP6 :0=RND(1 )x5+1:LOCATEJ 1:COLORO:PRINT " 作 蘭 本 N 「:OCATEJ. 1+1:COLOR 
0+1:PRINT | 画 証 証 H(J/342.172)=3:H(J/3+1 1/2)=3:NEXTJ、1:H(X,Y)=6 

9 FORP=9T04:S=U(P) :T=Z(P) :PUTQA(Sx24-21,Tx16)-(Sx24-4。Tx16+15) ,A,PSET : NEXT 

9 LOCATE22.24:PRINT "コノ 5 が カイ メト デス "(FORI=9T099 :BEEP1 :FORJ=9T09 :NEXT : BEEP9 :NEXT 

19 FORP=0TO04:S=U(P):T=Z(P) :PUTAACSx24-21 .Tx16)-(Sx24-4.Tx16+15) .C、PSET :NEXT 

11 FORP=9TOQ:W=RND(1)%Q:V=RND( 1)xQ:SWAPHU(W) 、U(V) :SWAPZ(W) ,Z(V) :NEXT : 「 の by 日. 

12 FORP=9T0Q:S=U(P):T=Z(P) :PUTOA(Sx24-21 、Tx16)-(Sx24-4、Tx16+15) .A、PSET : NEXT 

13 LOCATE22.24:PRINTUSING"@%9 。 持 メ ン SCORE 拉 909 特 凍 に 0-4: し に ETFQ=26THENEND 

14 AS=INKEY$: IFA$="1"THENBEEP1:BEEP9:M=-1:N=9ELSEIFA や = "3"THENBEEP1 : BEEP9 :M=1:N=9ELSELFA$= "5"THEN 
BEEP1:BEEP0:M=9:N=-1ELSEIFA$= "2"THENBEEP1 :BEEP9 :M=9:N=1ELSE14 

15 IFHCX+M,Y+N) =STHEN13EILSEIFH(X+M,Y+N) =2THENBEEP:1L.= し -19:GOTO3ELSEPUTQA(Xx24-21 ,Yx16)-(Xx24-4,Yx 
16+15),C,PSET IX=X+M:Y=Y+N:PUT@A(Xx24-21 、Yx16)-(Xx24-4.Yx16+15) ,B,PSET : IFH(X,Y)=1THENH(X 、Y) =9 :K=K 
+1: し =+KX1: IFK=5THENQ=Q+ 1:GOTO3ELSE13ELSE13 

16 DATA4995.799,-12289、-2949,-498、-1918、3113.3135,19638,-244 29972.-3133,14393、-4112.-3588、31736 
・15399.3109,1922.519.963,1023、-7687,-16333,-833,-497.-593,-1661,-95,-416,-32576,13956.9,-772.9.9 
9.224 9.9、526.139,3113、3195,19638 ,-39968 ,29972 

17 DATA25026,.14393,2163,-3588,31736 16382、-12292.1922,12798.69,3972.6,12.0.9.9.9,9,9,1.9.-3972.9 
9、9.9、244.9.9.526,139,3113.3135,19638,-244 20972,-3133,14393、-4112.-3588.31736,15399,3199、1922. 
919,195,.9,-32743,12,-32768,9.9.9,9.9,9.9.9.9 


@ 一 表 市 民 も 怪人 も みん な 同じ 顔 ビシ 逮捕 し て いく ゲー ム な の だ 。 怪人 を ひと りつ か まえ る と 100 点 、 

タイ トル 表示 の あと 、 お まわ りさ ん 5 人 の 怪人 は 再び 一 般 市 民 も と いっ し 2 人 目 は 200 点 …… と ポイ ント が 増え 
が 現れ 、 家 が 出 て て る と 、 5 人 の 人 怪人 。 ょ に 出 て くる 。 こ の と き 、 ど こ に 怪人 ”。 て き て 、5 人 捕まえ た ら 面 ク リア 。21 
が 出 て くる 。 し ば ら 《 す る と 消え て し 。 が いた か を 覚え て いな いと 、 一 般 市 民 。 面 ま で ある 。 全 部 クリ ア で きる か な 。 


まう の で 、 よ ー く 位置 を 覚え て お こう 。 を まち が えて 逮 補 し た ら 、 ビ ー 
キミ は 、 お まわ りさ ん 役 。 [1I21315| ッ と 鳴っ て 、1000 点 減点 。 を の 
キー で 上 左右 に 動い て 、 怪 人 人 を ビシ 面 は や りな お し 。 


及 昌吉 


KK……ー 捕まえ だ 怪人 の 数 
H(z.…… 画面 の 状態 


14 一 15 キー 入力 判定 と その 処理 
16-17 キャ ラフ の デー タイ 


「 制約 の ある な か で 
る な < 。。。 
けら ま いか に お も し ろく 
商 の 1 る か が 楽し い 
21 ア 面 作 1 
目 36 歳 の 3 児 の 父親 で す 。 職業 識 蘭 
に は 高校 の 数 学 の 教員 で す 。 は 3 を 
は 自 の じ め て 作っ た プロ グラ ム が ポ プ コ ム に 載っ て 以来 投稿 
ね 全 く に 夢中 に な り 、 そ の あと テク ボリ の 1 画面 プロ グラ ム 
人 を 見 て お も し ろ そ うな の で 作っ て み ま し た 。 
画 変 数 リス ト ・X.Y…… お まわ りさ ん の 座標 
A(Z)…… 怪人 (市 民 ) の キャ ラフ タダ の デー ・ ら 8 本 .…… 笠 人 (市 民 ) の 座標 
マ 。 い (4).Z(。)…… 怪 人 (市 民 ) の 座標 (S.T の 
B(e)…… あま わり さん の キャ ラン タダ デー ・ スタ ヤッ ツ グ 用 ) 
の * MIN……| あま わり の さん の 方 向 フ ラグ 
C(Z)…… 空白 (キャ ラク フイ を 消す だ め に ? 画 プ ロ プ ラム の 説明 
使う ) ・ 1 一 3 初期 設定 ・ オ ー プ ニン グ 
し 95 な の 4 @ 4--12 画面 作成 
〇 … 市 民 と 怪人 の 合計 数 ・13 終了 判定 


倫 、〈 カ イ 人 . 29 記憶 力 が も の を いう や つ ネ ! こ ー ゆ ーー の は 、 ま か せな さい 。 つ と 言 つた 矢先 に 市 民 を 殺し ちゃ つ だ よー ん 。 
6 一 7 人 に な る と 、 そ ろ そ ろ あ ぶな つか し ぐ な る の よね 。 ま あ 、 あ だ し の 記憶 力も こん な も ん ガ と 自覚 し まし た 。 


@ テ ン キ ー た た いて 、 ワ イア ッ ト ア ー プ 気分 


FOR FM-ZNEWZ/ZZ 


見 て の と ちり 、 早 撃ち ゲー ム 。 な ん け 早 く 次 の ター ゲッ ト 数 字 が 出る 。25 
だ か ヵ か を それ っ ぽい ムー ド の ある 画面 だ ね 。 回 連続 で 、 タ イム の 短 る を 競う の だ 。 

この ゲー ム に は 2 つの モー ド が ある 。 モー ド 2 で は 、 こ れ と ちがっ て 、25 回 

1 つ は 、 モ ー ド 1 の 連続 撃ち の タイ ム 一 定 の 間隔 で 、 的 が 出 て くる 。 雨 の 日 に 玄関 で 悪夢 を 見 
を 競う も の 。 もう 1 つ は 、 モ ー ド 2 の これ を な る べく 正確 に と ら え て | + 宙 丸 裕一 ・17 歳 ・ 高 3 

> 車 の S、 0 
ショ ッ ト の 正確 る を 競う も の 。 撃ち 、 命中 し た 数 の 多き る それ は ある 雨 の 降る 日 だ っ た 。 
モー ド 1 で は 、 タ ー ゲ ッ ト の を 競う の だ 。 とこ | 玄関 に 1 枚 の 封筒 が 、 こ っ これ は 
間 旨 了 有 ク 彼 は 言っ た 。 こ れ は 悪夢 
3 い T 休 
炒 字 を キ ろ て 、 最 近 射 没 グ | た と 、 誠 南 工業 高校 電気 研究 会 
ー ム が は や っ て | パン ザイ / 
編集 部 注 ・ そ うか 、 雨 の 降る 日 

る つっ て ホン ト ? | だ っ た の か 。 そ れ は よかっ た 。 


< 胸 に 表示 され | み ー ん な 夢 の な か の こと な の pY _ _ 
だ 数 字 が ター ゲ し だ 。 ポ シェ ッ ト ば ん ざい 徳丸 裕一 


0 ト の ナン / 0 


、 
@ 2 つの モー ド が 楽し め る ぞ ,/ で すばやく 押す と 、 早 〈 く 押せ ば それ だ 2 


変 数 リス ト 。 10-- 20 初期 画面 ・ 設 定 
X…… タ ー ゲ ッ ト の 表示 する 座標 90Po 50 ダー クツ ド 者 所 
OO…… 色 指 定 s 60- 70 モー ド 選 択 


D…… タ ー ゲ ッ ト 番 号 の 座標 。 80- 90 モー ド 1 の 処理 
A…… タ ー ゲ ッ ト 番 号 ・100 当 た つ だ カウ ント と 爆発 音 
A$…… キ ー 入 力 ・110 モー ド 1 の 判定 


B…… キ ー 入 力 の 信 ・120-140 モー ド 2 の 処理 と 判定 
W…… モ ー ド 2 の 当 た つ だ 回 数 ・150-200 ENDING 


G…… モ ー ド 1 の 時 間 カ ウン ト 。210 待ち 時 間 
較 プ ロブ プラ ム の 説明 6 


19 WIDTH89,25:LINE(9,9)-(79.6)," 還 "。7、B:SYMBOL(39,14) "SHOT GUN" ,9.4,7:FORI=1TO06: 
COLOR=( 1 .9):NEXT 

29 DEFINTA-Z:RANDOMIZETIME:W=9:C=9:D=11:G=9 

39 FORX=39TO519STEP129:C=C+1:LINE(X,198)-(X+199,178) ,PSET ,C,B 

49 CONNECT(X+19,178)-(X+19,138)-(X+49,138)-(X+49,134)-(X+69,134)-(X+69,138)-(X+9 
9 ,138)-(X+99,178) ,C,PSET : COLORC:LOCATED,18:PRINTC:D=D+15 

59 CIRCLE(X+79,148),15.C:CIRCLE(X+59 125) , 29,C,.5,.3,.2:NEXT 

69 COLOR7:LOCATE25,11:PRINT "SELECT (MODE--1 OR MODE--2)『“ 

79 COLOR=(A,9):A や も =INKEY$ も :IF A$="1" THEN 89 ELSE IF A$="2" THEN 129 ELSE 79 

89 GOSUB199:FORI=9T03999:NEXT :FORS= 1TO25 :COLOR=(A,9):A=RND( 1 )*4+1:COLOR=(A,6) 

99 G=G+ 1:A$=INKEY$:B=VAL(A$) : IF B<>A THEN 99 ELSE GOSUB199:NEXT:GOTO119 

199 W=w+1:SOUND6 , 9 : SOUND7 , 5 : SOUND8 , 21 : SOUND9 , 21 :SOUND12,15:SOUND13,9:RETURN 

119 IF G<1299 THEN 159 ELSE IF G<1399 THEN 169 ELSE IF G<1499 THEN 179 ELSE 189 
129 GOSUB199:FORI=9T03999:NEXT:FORI=1T025:COLOR=(A,9):A=RND( 1 ) 4+1:COLOR= (4。 6 ) 
139 FORS=9TO79:A$=INKEY$:B=VAL(A$):IF B=A THEN GOSUB199 ELSE NEXT 

149 NEXT:IF W>29 THEN 159 ELSE IF w>15 THEN 169 ELSE IF W>19 THEN 179 ELSE 189 
159 LOCATE25, 11:PRINT "アナ タ 八 スハ ^ ラ シイ NEW TYPE テ ^ ス ! "EGOTO209 

169 LOCATE25 , 1 1 : PRINT "アナ タ 用 ナカ ナカ ノ 敗 ン シャ シン サイ テ ~ ス ! "EGOTO209 

179 LOCATE25, 11:PRINT "アナ タ 用 フウ ウ ノレ ヒト ノ フ ヨウ デ に ス ! "EGOTO299 

189 LOCATE25 , 1 1 : PRINT "アナ タ 八 モウ スコ シ ト ~ リ ョ ク カ ~ ヒ ツ ヨ ウ デス 1! "EGOTO200 

199 LOCATE25,11:PRINT" ": RETURN 

299 PLAY"V15T19911904S9CDEFFFEEEDDCC" , "も t199L1903S9CDEFFFEEEDDCC" 
FORI=1TO19999:NEXT:GOTO29 


裕 - ル ゴ 一 デー ビ ツ と ン ロ ン 司 必 / 


、 (SHOT GUN〉 は じ め は 、 ぜ ゼー ぜん だ め 。 ぐ や し いか ら 、 真 侯 に や つ だ ら 、 や つと フツ ウ の 人 。 ち な み に め み は 、 ラ 
イフ ル 和 撃 ( 動 物 や お 皿 を 撃つ の じゃ な ぐ て 、 的 を 狙う だ け ) の 免許 を 取 ろ うと 思 つて ます 。 77 


< の の 笠 ブ トニ で で は いと ロ 由 名 四 ヤマ 


りつ 〇 か X か "? 不良 品 の 宝石 を 探し 出せ / 


@ 6 つの キー を 押し て 不良 品 チ ェ ッ ク 一 ナー。 キ ミ は ここ て 故障 し た モン サ 

な ん が か 最近 、 ア ル バ イ トゲ ー ム が 多 。 一 を まえ に 、 手 動 で 製品 検査 を し て い 
いけ と 、 こ れ も そ の ひと つ 。 思わ ず 、 る の だ 。 6 列 の ベル トコ ユン ベア に 乗っ 
「 働 くっ て いう の は た い へ ん な こと な て 出 て くる 製品 の うち 、 不 良品 どけ は 
ん だ な あ /」 と 思っ ちゃ う ゲ ー ム で す 。 赤く 光っ て 出 て くる 。 を そこで キミ は す 

ここ は 、 宝 石工 場 ば や 〈、 不 良品 の 乗っ て いる 列 を 入力 
の 不 長 品 チ ェ ッ クコ し な く て は いけ な い の だ 。 CAPSLOCK 


1 ト の 1 面 押 2 
ィ ュ ャ ン 工 ツ wl ・ 
お オナ | 矯 画面 | cao* 
オツ カレ サフ テー シタ . \ ス こ 
アナ タ ニノ キョ ウノ アパ イ ト N \ 3385 月 デス 心 は よみ カ えっ た / 入力 する の だ 。 
生生 90000 FM- 7 を 最近 は ゲー ム よ り 実 務 | " 
クン ンク に 使用 し て いま す が 、 ポ シェ ッ 不良 品 が 消え 
ト の 1 画面 プロ グラ ム を 見 て 、 る まで に 
ィ バ て に その 
ひさ し ぶり に プロ グラ ム 作 り に 
トラ イ し て み ま し た 。 現在 、 マ キー の ラン グ 
シン 語 の プロ グラ ム が 組め る よ に 5 
、 _ が つけ ば OK。 
うに と 勉強 し な が ら す ぐに 寝 て 
し まう 気 の 若 い お じ さん で す 。 
画 プロ ブラ ム の 説明 。170 一 180 セン サー 色 塗 り 。P-… 不 良品 設定 フラ ブ ・XT 文 を 入れ て 自分 の 好き な 速 さ に し ま 
10- 50 初期 ・ 画 面 設定 ・ 回 変数 リス ト 。 X…… 宝 石 の 座標 * し よう 。 ま だ 「 1 ゲーム を も つと 長 こ や 
60- 90 入力 キー 判定 。G…… 宝 石 の カウ ント ・H.S…… ア ル バ イ ト 料 ・ り だ い 」 こ と いう 人 は 60 行 の の 値 を 変え 
100 チエ ッ フ し レ し た か どう か 判定 *F.…… 不 良品 の 数 。 2.W…… セ ン サ ー 色 塗り 座標 ・ ま し ょ よう (ヒロ ) 
110 乱数 で キヤ ラフ 座標 設定 ・S…… 不 良品 を チエ ッ フ し だ 数 ・ 画 チェ エン フ ボ ポイ ント ・ 
120-130 キャ ラフ 表示 。 し 難易 度 ・「 ち よっ つと 速 べ て 不良 品 が 取れ な い 」 と < 
140 一 160 ENDING *。K…… 入 力 キ ー 読 みとり ” いう 人 は 110 行 の 一 番 後ろ に FORNE * 


| て くく 1985 。 さ M.INOUE ※% JEWELRY MACHINE xx >>> 
19 COLOR7,9:CLS:WIDTH49 , 25:CONSOLE19,5.9.9:G=9:S=9:F=9:Z=19: し も ="" 
2Z9 LOCATE9,14:INPUT" マ シーン No.(1-19) *iL:IF L<1 OR L>19 THEN 2 
39 LINE(9,9)-(639,79),PSET , 1,BF:LINE(9,129)-(639,199) ,PSET, 1,BF:FOR I=166 TO 44B 
STEP 47:LINE(T+5,79)-(T+37,75) ,PSET ,5、B:PAINT(I+6,71) 9,5:PRINT:NEXTI 
49 LINE(149,25)-(479,59) , PSET , 3 ,B:SYMBOL( 169 , 31 ) , "セン サー" 。 9.2.6:SYMBOL(177,58) 。"Z 
XX CC 1 2 3"。2。1.7:SYMBOL(56 , 135 ) , "フリ ヨウ ヒン ・・ 9"。2。1 7:SYMBOL( 399 , 1 35 ) 。 "チェ ックス ~ 
9",2。1 7:SYMBOL( 89 ,169 ) , "JEWELRY MACHINE" , 4,3,2: し $ も =STR$( し ) 
S9 LINE(79,155)-(579,185) ,PSET , 6,B:L$=" マ シー ン NO . "+ し $: SYMBOL( 195,5) ,L も ,3。1,4 
69 WHILE G<192:G=G+1:COLOR4 :PRINT TAB(8)"4"::PRINT TAB(29)"N" 
79 K=PEEK( 8&HFD91 ) :IF K=49 THEN W=19:GOTO 179 ELSE IF K=59 THEN w=22:GOTO 179 
89 IF K=51 THEN W=25:GOTO 179 ELSE IF K=99 THEN w=19:GOTO 179 
939 IF K=88 THEN W=13:GOTO 179 ELSE IF K=67 THEN W=16:GOTO 179 
199 R=SCREEN(W,19):IF R=&H9C THEN PLAY"V1206L32CF ":S=S+ 1 :S$=STR$(S) :LINE(559 , 135 
)-(629,145) ,PSET , 1 , BF : SYMBOL(559 , 135 ) ,S$,2, 1。5 
119 X=INT(RNDx6 ) x3+ 19:P=RND( 1 ) 
129 IF P く <L/19 THEN COLOR 4:PRINT TAB(8)"": :COLOR2 : PRINT TAB(X)"/, い "15:COLOR4 : PRI 
NT TAB(29) "2F=F+1:F$ も =STR$(F ) :LINE(194,135)-(279,145) , PSET , 1 , BF: SYMBOL( 194,135 ) 
5F も ,2.1.5:GOTO 149 
139 PRINT TAB(8)" マ "ij:COLOR7:PRINT TAB(X)"r@ っ "ji:COLOR4 :PRINT TAB(29) "" 
149 WEND:FORI=9TO1999:NEXTI:FOR 1I=9TO4:PRINT : NEXT ! :PRINT TAB( 1 ) "オツ カレ サマ テー シタ " 
159 HS=INT((S/F)x1999)xL:COLOR6 : PRINTTAB( 5 ) "アナ タ ノ キョ ウ ノ アル デイ ト 用 \"iHSi+" 円 テース" 
169 COLOR3:PRINT:PRINT TAB(11)" リ フッ レイ ?2(Y/N)"::INPUT A$:IFA も ="Y"THEN 19 ELSE END 
179 IF W<>Z THEN PAINT(Zx16+24,71).9,5 
PAINT(WX16+24,.71).2.5:Z=W:GOTO 1 


〈JEWELRY MACHINE:> 反射 神経 ゲー ム は だ ーー い 好き 。 こ の ゲー ム も 楽し ひか つ だ なあ 。 こ 一 ゆー ゲー ム ハ は あせ り は 禁 
物 。 あ せれ ば あせ る ほど 、 へ ん ちこ ぐり ん な こと を し ちゃ う の よ ね エ 。 あ た だ し も 人 の こと 言え ん けど サ 


@⑤ プ オォ ー、 プ オー/ ジー ラ の 火災 が こわ いよ ー 々 


の 0 


FOR r- グ MEWZ2Z 


DEFINT A-Z:COLOR7、9:WIDTH 49.25:DIMK%(31) 、F%(7):L(9)=19:L(1)=(15):L(2)=8 
RANDOMIZE TIME:FOR I=9 TO 31:READ K%(I):NEXT:FOR 1=9 TO7:READ F%(1):NEXT 
FOR I=9 TO2:B(I)=INT(RNDx29)+4:E(1)=1:NEXT:Q=6:IF S>H THENH=S:S=9ELSES=9 
X=29:Y=2:ZX=5:P=9:LINE(2.9)-(38.24)、" 較 "1.B:LINE(3.23)-(37.23) ." 較 "2:GOSUPBSS 
FOR I=5 TO35 STEP2:COLOR6 :LOCATEI.22:PRINT "。":NEXT1:FORT=9TO2999:NEXTI:BEET 
LOCATE X、Y:PRINT" "EE:A も =INKEY も :Y=Y+1:IFA$ く >" 9 THEN Y=Y+2X(Y>2):PLAYPVU1301C64" 
IF X<5 THEN X=35:PLAY"v12o7114eabr" ELSE IF X>35 THEN X=5:PLAY "V1207114eahr 
X=X+(A や ="4")-(A も ="6"):PUTG (XXx16,.Yx8)-(Xx16+15.Yx8+7) 、F%,PSET 7:J=SCREEN(X・ 移 
IF J=161 THEN PLAY "08164cd":S=S+19:P=P+1:GOTO11 ELSE IF J=254 THEN S=S+100 
1F POINT (Xx16+8.Yx8+6)=-1 THEN PLAY"V1505164edcde":GOTO 20 
IF INT (RNDxQ)=9 THEN GOSUB 22: ZX=ZX+SGN ( X-ZX ):GOSUB 22 
COLOR 6:IF INT ( RNDx15)=9 AND ABS (X-ZX) <19 THEN GOSUB 17 
FORI=9TO2:B(T)=B(I)+E(I):LOCATEB( 1 ) .L(T):PRINT | 還 較 識 蘭 "に CHRS( 254)、「 証 還 還 間 「・ 
IF B(I)=3 OR B(I)=27 THEN E(1)=-E(1):PLAY"V15o2a59":NEXT I ELSE NEXT ! 
COLOR 5:IF P=16 THEN PLAY "V1506a5e19":Q=Q+( Q>1 ):CLSEGOTO 4 
LOCATE9 ,9:PRINTUSING"H1 半井 福 #":H:LOCATE23.9:PRINTUSING"SCORE 提 提 拍 手持 上 "KS:GOTO6 
SOUND 7。247:SOUND 8,16:SOUND 6,15:SOUND 12,1:SOUND 11.56:SOUND 13、13 
FORC= 2T09STEP- 2 :FORW= 19TO1STEP- 1 :LOCATEZX- 1 .W:PRINTCHR$ も (17)+CHR も (CO)+ 王 還 ア / 
NEXT _W:NEXT C:SOUND8、9:IF ZX-2<X AND ZX+3>X THEN LOCATEX、Y:GOTO29 ELSE16 
PRINT "※X":PLAY " V15 02125cdedca2c2": SYMBOL( 149.79 ), "GAME_ OVER" 5.3、2 
A$=INKEY$ も :LOCATE14.15:PRINT"Hit SPC Key"::IFA も =" "THEN CLS:GOTO 3 ELSEZ1 
PUTQ (ZXx16.169)-(ZXx16+31.175),K%,XOR,3 : RETURN 
DATA 9@.9,448.0.984.9,2916.768.3894.7949:3769 3994.3132,16099、2947,-758 
DATA 1923,-3972.255,-11264,63,-22492 .16447、-16,-16257,-2816,28917,-1924 
DATA 16349.15369,3392,16128,4989.28679.-8193.39718、8184.2329.1312、969 


ーー ニーー の の ココ の の ょ よび ゆら 一 


@ 地 面 に 散ら ば る 金塊 を ひろ いま くれ 。 っ つけ だ し 、 人 金塊 を 全部 取る の は な か な 了 は 知 え パ 
OS SN す 反 の ミ UL 出 
は 、、 の が か に いる ハシ ス クツ か 難し い の だ 。 る 対 端 の NM 
ファ アル 。 月 まで 冒険 に 行っ た だ け で キミ の 気球 は ほっ と くに な WAM 
は も の た ら ず 、 ジ ー ラ (恐竜 ) と ムー どん どん 下 に フ 行 1 改作 Hl 


M 峰 貼 
川 作 | 帽 
開 民 作 


バ (動く 壁 ) に 守ら れ た 金塊 を 手 に 入 
0 まあ とら こま て 30 て きだ ジー ラク 
は と きど でき 、 プ ォ キー と 火 を 史 い て 
くる し 、 み ーー バ は な ん だ か ジャ マ 


上 に 上 挿し よう 。 そ の ほか の キー 


THHHHHHTUITHTLLUTTHTTTI 
は TH4HIH1HHtHT 時 は 


ITHHHHTHHHTUHHHHHHHIUUIITHHTIITIHII ) FrO~ て し ムー バ の 真中 は な ぜ カ か ボ ポイ 


中 111 1 TITHHHTTTIITITITI 
4 導 相 4 


\ 

ii 11 1 硬 | * 

111T1II 11111111111ITITTIT1 に まっ A ) 

UIINNINNNINUIUNU 訂 に ント ゾー ン だ が 、 そ れ 以 外 は 
HHHHHHHLLLHIIIHLUHHHHTIHHITTITTITTII 


HHHHHHHUHIUUUUHHHHHHTIHHHHII ど ググ トド 。 ジー ラ の 火炎 、 床 も ぶつ か る 


ijHHHHHHHIIIILIIIITTTIIHIHI IIIHII 
IIITIIIIIITIITIII 湯 間 情 則 屋 肌 還 還 間島 較 較 表 介 | 


] 
| 
MHRNNNHINHNHN り と アウ ト だ 。 キ ミ は 人 泡 塊 を 全部 取っ て 
THHHIHIHIITHHHIHTTITTTIHI 琴 変数 リス ト 画 プ ロブ ラム の 説明 
MM K%(g)…… ジ ー ラ の キャ ラフ タデ ー タ * 1-- 5 初期 設定 ・ 画 面 
| 用 員 」 | F%(Z) NM 気球 の キヤ ラク クタ デー 6-- 8 気球 の 和 動 
9-11 何かと 接触 し だ ガ 


由 NFWNME # 相 B(e)…… ム ー バ の x 卒 標 
12-14 ジー ラ ・ ム ハー バー の 物 動 
15 一 16 面 フ リア 判定 ・ 点 表示 


| 川 用 用 敗 川 川 
川上 則 | | 4 か わい いけ ど 炎 が AT - 気 學 の Xy 春 林 5 フリ 
17 一 21 ジー ラ の 火炎 攻撃 と ENDIN 


川 川 旧 由 


川上 唱 届 」 | ーッ こう ーー 
| INHNIIIIIIII こわ い ジ ー ラ 。 面 が に re GOLD を 取 つ だ 数 
加 人 衝 進む た びに し つこ く O…… ジ ー ラ ガ 迫 つて こる 確率 22 ジー ラ 表 示 
WW 」 な っ て こる の で す 。 oO スコ ア 、 ハ イス コア eoCgD 。 キヤ ラク の クタ データ 


FIRE STORM〉 な ん と いつ て も 、 カ イジ ユウ が 、 ワ カメ の よう な 火 を ふぐ の が いい ね 。 音 も で る し 、 お も し ろ い けど 、 了 タ 
宇 は うつ し か 取れ な か つた だ 。 残 意 賞 で し た 。 ち や ん ちや ん 。 


お LU で 07 で 、 4 て 大 上 、 6 大 


次 - ル ゴ 一 テー ビワ ソー と ン ロン 同属 / @⑯ 


MM MM MM 


FOR 炎 朋 リース (G_-RAM 各 ) 


ガ u-BAS/C 
@ 朝 の 低 気 圧 を スカ ッ と させ る ゲー ム 
朝 は 眠い じい 。 な ぜ な ら 起 きだ た ばっかり る スズ メ た だ ち を 次 か ら 次 に と り くし 
だ か りら 。 ふだん は 心 や る し い 人 て ちゃ 、 Cx《05 て し た 。 
朝 は と て も 不機嫌 で ビリ ビリ し て る 人 Am の RAN デ ト 


っ て 多い で し ょ 。 こ の ゲー ム の 主人 公 ン キ ー で 、 妥 准 あ 上 下 左右 に 動か し て 、 
も 5 そん な 人 で し た 。 朝 、 ス ズ メ の 鳴き スペ ー ス キー で ショ ッ ト // 黄色 の ス 


レン 

へ 
声 で 起こ きれ て し まっ た キミ は 、 無 意 ズ メ は 10 点 、 青 い ス ズ メ は 20 点 な の だ 。 
4 NN 軸 。。 な らん で いる スズ メ 。 た スズ メ は お どろ ク 


て 、 電 線 に と まっ て い の うち 1 羽 を 撃ち 落と いけ て し まう 
す よ 、 そ の まわ り に い 制限 時 間 内 に 何 6 で さっ 


3 車 を 子 で を 8 
< チュン チュ ン 、 ス ズ メ が 状 骨 ち 沙 と せる か >。 
画面 で スズ な り に な つて る 。 


田 変 数 リス ト ・ 10 画面 設定 1 

H$…… 準 の キヤ ャ ラフ マ ・15 初期 設定 

W$-…- 準 消去 用 20 タイ トル 表示 

XY…… 明 準 の 座標 の キー 入力 処理 ・ 虫 準 移動 
XX.YY…… 明 準 の 座標 増分 ・30 BGM 

HI…… ハ イス コア ・35 一 40 エア ガン 発射 判定 ・ 準 表示 ・ 
SC…… ス コア 馬 の 座 標 決定 ・ 表 示 ・ 消 去 
MS お …- muSsicC デ ー ヤ ・ 45--50 エア ガン 発射 処理 
TIM-……: 制 限 時 間 。 55 画面 設定 2 

BX.BY-…… 記 の 喉 標 ・60 スコ ア 等 表示 

プ ロブ ラム の 説明 。 65 ゲー ム オ ー バ ー 処 理 


5 PCG 設 定 ・BGM 等 


5 CLS:FORI=225T0226:READI$:DEFCHR$(1)=HEXCHR$(1$) :NEXT : RESTORE55 :DATA99999981DBFF7E423C5A7E7E3C3 
C3CE73C5A66FFFFFF7E90 , 9999999183C3C423C5A7EFFFFFF7EA599991899183C3CE7 :N$=CHR$(29,29,29,31,31 ) :T 
EMP029 :PLAY"05D4RID4EFGFEDCR1C4DERIE4DR1D5*" 

19 wIDTH49:INIT:DEFINTA-Z:CLICKOFF:H$="r ュ リ +N も 64" トコ "iM も =" "4NS の "EHI=9:FORI=4TO16STEP3:FORE 
=5TO7:LINE(19,Ix8+7-F)-(389,Ix8+7-F) ,PSET,F:NEXT :NEXT:PRM 4 

15 HI=HI-((SC-HI ) 9)x(SC-HI ) :GOSUB55 :PLAY"05R4" :TEMP02999:TIM=599:X=17:Y=8 

2 LOCATE6,9:CSIZE2:PRINT#9," 還 IIRD HUNTER 填 " :REPEAT:UNTIL STRIG(9) :CSIZE9:CLS 

25 ST=STICK(9):XX=((ST=4)-(ST=6) )x2:YY=((ST=8)- (ST=2) )x3:COLOR6:IF (X+XX く 1)+(X+XX>36)+(Y+YY く 1)+( 
Y+YY>18) THEN XX=9:YY=9 

39 READ M$:IF M$ も ="@" THEN RESTORE55:M$="G" 

35 IFSTRIG(9 )THENGOT045ELSELOCATEX,Y:PRINTW$:X=X+XX:Y=Y+YY:LOCATEX,Y:PRINTHS:PLAYM$:BX= INT (RNDx1 
8+1 )*2:BY=INT(RNDx5+1)x3:POKE@&H3889+BX+BYx49,225+RND 

49 POKEW8H2999+BX+BYx49 ,39:BX=INT(RNDx18+1)*2:BY=INT(RNDx5+1 )*3:LINE(BX-2,BY-2)-(BX+2。BY+2)。" ",。 
BF:TIM=TIM- 1 :GOSUB69:IF TIM=9 THEN 65 ELSE GOTO25 

45 F=9999:LINE(8,176)-((X+1)x8+4,(Y+1)x8+4) ,XOR,2,F:LINE(384,176)-((X+1)x8+4,(Y+1)*8+4) ,XOR,2,F: 
し =INSTR( "O$" ,SCRN$(X+1,Y+1。1) ) : IFL>9THENBEEP : SC=SC+10- (し =2)x19 

59 LINE(8,176)-((X+1 )*8+4,(Y+1)x8+4) 。XOR。2,F:LINE(394,176)-((X+1)x8+4,(Y+1)x8+4),XOR,2,F:LINE(X- 
1,Y+1)-(X+3。Y+1)," "。BF:TIM=TIM-1:GOSUB69: IFTIM=9THEN65ELSE25 

55 DATAE,E,E,E,E,D,C,D,F。F,F,F,F,G,A,@:FORI=6T0319STEP389:LINE(I,9)-(I+19,189),PSET ,2,BF:FORS=9T 
019:F=RNDx32767 :LINE(1+S,9)-(I+S,189) ,PSET,6,F:NEXT :NEXT :SC=9 

69 COLOR6:LOCATE7 ,22:PRINT" ン SCORE "SC:" "COLOR3:LOCATE7 ,23:PRINT"N TIMER "iTIM:COLOR5:LOCAT 
E21,22:PRINT"HI-SCORE ":HI :COLOR7 :RETURN 

65 PLAY"07F2DFDCR7R7G2EGED":LOCATE12,11:CSIZE2:PRINT#9"TIME OUT":PAUSE19:GOTO15 


FOR 』】 シ リー ズ (G-RAM 要 ) 


月 u-BAS/C 


@ ス ペー スキ ー で タイ ミン グ を は か れ 

と いっ て も 、 迷 路 に は な っ て ませ ん 。 
まあ 民有 加 りく ざん て ド 全 
仙 0 が この 繰り 返し で す 。 な に ご と 
も な けれ ば 、 だ だ その まま 進む わけ だ 


っ た りき た り で 、 ジ ワ ジ ワ コ ゴー ル に 迫っ て いく / 


赤い 料 に ぶつ か る と 。 壁 を べ だ て て 
1 つま え に 押 し も どき る れる 。 逆 に 日 い 
物体 な ら 前 に 進む の だ 。 ブ レー キ は ス 
ペー スキ ー。 速 る を 競う ゲー ム だ よ 。 


の りき 4 文 p 運 | 2 
けど 、 右 が から 赤 い 岩 と 白い 物体 が 押し 内 9 上 
ょ よせ て き て 、 進 み ぐ あい に 影響 を あ た 提 了 5 
2 クリ 泊 半 
9 PA っ 
お 大野 礁 記 高 い 
205 な 7 きま 
少な つか Sa 
2 いな も 用 / 
の っ ら て こう 2 の ヒ 
S た ん は と ら な 末 ネ 
H が ゲ な を な と 
OF |1 い 書い と 野 ク 
+TM ム か な いしい 
ゃ り | の 今 つ 」 ど て 2 秦 レ 
っ す ム あ と G ロ 7 十 ま い 示 も た 
て ちる そい 路 つ U の る 8 る を の 引 た 
い の 金 だ いま N 徳 と か や 見 を ん ク 岐 
ま が も て 連 ら は 和 丸 は こつ て 直 
す は う ゲ 中 ん も 挫 思 ん は も く 南 
一 変数 リス ト 。 20 マシ ン 語 読み 込み 1 だ と き の 娘 理 
BT…… ベ スト タイ ム 30- 70 PCG 設 定 ・130 
XX( JJY( )…… 自 機 座標 80 初期 設定 2 s 140-150 ゴー ルイ ン の 和 負 理 
B$…… 自 分 の キャ ヤラ クイ 90-100 画面 設定 。 還 チェ ンク フ ボ イン ト 


AS$…… 横 ス フ ロ ー ル する キャ ラク <*110 
遼 プ ロブ ラム の 説明 ・ 
10- 15 初期 設定 1 4120 


自 機 移動 ・ 表 示 ・ ゴ ー ル 判定 * 
・ 体 (前進) の 出現 を 判定 し て いま す 。 小 
・ さ こす る と 白い 物体 の 出現 の 割合 が 高 ご 


・ わから な い ゲ ー ム で す 。 ど ご と ころ で 、110 行 
の RND く .6 で て 赤い 物体 (後退 ) と 白い 物 


横 ス フロ ー ル する キヤ ラジ ツジ ・ こ の ゲーム は 、 スベ ー ス キー で 操作 する ・ な のり ます 。 自 分 の 技 置 に あめ わせ て 適当 に 


の 決定 ・ 表 示 


・ より 、 だ だ 観 鉛 し て いる と き の ほ う が 速 。 サ えて みて こ だ さ い 。 
横 ス フロ ー ル ・ 何 か と 衝突 し * こ ゴ ー ル レ て し まう 場合 が びあ り 、 わ け の * 


(エイ キチ) 


19 CLEAR: SCREEN9 : WIDTH4:CLICKOFF:DEFINTA-Z:DIM B$(887) ,X(887) ,Y(911 ) : TEMPO2909 
15 CGEN:BT=1999:COLOR 7:LOCATE 13,18:PRINT "-- WAIT.。 --“" 


、 ボリ ェ ッ リト MY パコ カセ ッ ト テ ー ブ ) (東京) 時 田 作 (和歌山) 馬上 騰 可 (福井 ) 人 人 孝 彰 香川) 株 原 一 太 (大 阪 ) 池部 健 避 ( 毅 ) 
-(⑨・ ほ ko 上記 (三重) 本 昭 (広島 ) 中 則 (埼玉 ) 原 引 (長野 ) 渋 人 一 郎 ( 衣 ) 央 幸二 (愛知) 松下 
だ 、 〇 


29 FOR !=9 TO 58:READJ$:POKE 8&HE999+1,VAL("8&H"+J$) :NEXT:DATA 1,1,39,ED,78,FE,F9.38,2,3E,29 ,B,ED, 
79,3,3,3E,C9,B9,29,EE, 3E,33,B8,29,E9,B, 1E,29,ED,59,79,D6,28,4F,78,DE,9,47,3E,2F,B8,28,F1,C9,1,9。 
29,3E,27 ED,79,3.78,FE,24.29,F6,C9 

39 DEFCHR$( 32)=HEXCHR$( "999999999999999999999999999999999999999999999999") 

49 DEFCHR$(228 ) =HEXCHR$( "99193844381999994419387C381944994419287C28194409") 

59 DEFCHR や (165 ) =HEXCHR$( "99999899999499999999281428149999999999990900900099") 

69 DEFCHR$(255 ) =HEXCHR$( "63773E3E1C1C98981C98995D499899996377227F5D1C9898") 

79 DEFCHR$(254 ) =HEXCHR$( "98981C1C3E3E7763999998495D99981C98981C5D7F227763") 


89 FOR !=1 TO 37:L=255+(I MOD 2=1):FOR J=K TO K+23:X(J)=I:B$(J)=CHR$(L) :NEXT:K=J:NEXT:FOR !I=9 TO 
23:FOR J=I TO 887 STEP 48:Y(J)=23-1:Y(J+24)=1:NEXT:NEXT 

99 FOR I=16 TO 297 STEP 16:LINE (I,7)-(I,191),PSET,1:LINE (I+8.9)-(I+8,183) ,PSET,1:NEXT:LINE (8。 

9 )-(394,191 ) ,PSET,1,B:LINE (296,9)-(394,7) ,PSET,6,BF 


199 LOCATE 11,18:PRINT "START (SPACE)"::IR STRIG(9) THEN CLS:CALL 8HE92D:M=9:TIME=9:LOCATE 6,24 
・COLOR7:PRINT "TIME: 9 BEST-TIME: "iBTi:GOTO 119:ELSE 196 

119 CGEN 1:LOCATE 39,RNDx23:PRINT A$::IF RND<.6 THEN A$="・" ELSE A$="$" 

129 CALL 8&HE999:C$=CHARACTER$(X(M) ,Y(M) ):IF C$=" " THEN 139 ELSE IF C$="$" THEN PLAY “"O6D:E":M= 
M-48x(M<838):ELSE PLAY "03D":M=M+48x(M>49) 

139 LOCATE X(M),Y(M) :PRINT B$(M)::LOCATE 11,24:CGEN:PRINT TIME: :M=M+STRIG(9)+1:IF MK888 THEN 119 
149 CSIZE 2:COLOR 6:LOCATE 19.13:PRINT#9 , "GOAL IN !"i:IF TIME く BT THEN BT=TIME 

159 COLOR3:GOTO 109 


7 ら 


裕 /X 一 テー ビワ と ンジ ロン 司 選 / ⑯ 


る フィ ー ン 、 い っ た い オ ラ ど ご どこ を 歩い て る だ !? 


FOR MIZ-7500 


QD-BASJC(MZ-5Z007) 


欠 ク ニョ ー と 緑色 ドッ ト が うねる の だ 
⑧ で 勢力 を 拡大 し つつ ある テク ポリ 
車 と 、 じ り 貧 の わが ポシェ ッ ト 軍 と の 
戦い が 始ま っ て 350 年 が 経過 し た 。 わ 
が ボン シェット 田 は 最終 兵器 「SUPER 


7 
さき な い の で ある 。 前線 の 惑星 MZ は 全 


上 が 砂漠 な の で 、 キ ミ は 大 型 タ ンカ ー / 


この 兵 只 は 水 が な い と 使用 で 


途中 の 道 に は テク ポリ の ⑧ バ リア が は 
られ て いる 。 しかも./ キミ は うか つ 
に も 尊 を 飲ん で 酔っ ぱら っ て し まっ た 
が の の 

キミ は 、 ど う も 思い どおり に は 動か 
な い TAGOSAKU (左下 の 点 ) を カー 
ソル キー で あや つっ て 、 画 面 の 右端 を 
目指 せ 。 


WATER GUN」 を 開発 。 前 線 に 送っ " ま て 水 を 運ぶ こと に な っ た 。 し か いい 


1 INITPUERTIB'IR=5OIG=OE GBDTD1O 
< GET ロ も 』 1TF ロ も = リリ THENG も = ムツ 名 
っ レビ デレ + (は 生 = り 回 りう (ES10) 一 ( ロ 和 まり 詳 り う ( ビ ジー10)gD 
デーD リ +( ロ 重り うま (DE 1O) 一 ( ロ 和 も = リ 還 りり ) (DD ジー10) 8 メニ X 二 
じ /10< Y テ Y+ サ D/10 ょ FFPUTNT(XY フ (0 
邊 NF /2GGOTO1 1 。 号 。9 
っ SETE 人 44]X』 YE まま = ロ まま BDTOS 


ムロ = ニ ゴ 19: 昌 = ニ 199sC=OE D=OE X テ マミ Y=1 9 2 義 3E 

7 FORT=RTDABTEFR*LTNELS]T』O。 TE=RND ( 1 ) | フロ 22c の ma 
*179:LTNE[LO]1T。E。1。E+RI NE XT 2 キース カ 

B EDXEGJD。O。R。BsLINE[6]A。O。Q。 BI BDTD2 誠に 
9 =+1 5R=Rー エ ミュ TFRS 1THENR=40i ロニ ロロ 5 2 
10 PLGSIB ま = り リ ェ 仙 ま "ms BUDTD6 7ー 8 画面 本 


9 一 10 面 の リア 処理 

Ho44 ゲー ム オ ー パ バー 処理 

一 チエ ン フ ボイン ト 

面 が 進む びに つれ て バリ ア の 間隔 が 少し せ 
まぐ な り パ バ パニック に な つて し まい ます 。 
面 ジ リア の と き や 、 壁 (バリ ア ) に 衝突 
し だ を とき に 、 何 の 音 も な ぐ ご 少し さび し い 
と 思い ます の で 適当 に 付け だ し て みて ぐ ご 
だ さい 。 (エイ キチ ) 


11 FURI=1TU9ICTRCLEES1X』。Y。 TsNEXTEFRINT"H 
1 SCURE "Hi TIFSHTHENH=BIFIRTNT"YDUR SCUR 
E 1 HI SCORE!!" 

1g FRINT "TSCDRE "sgSgFRTINT "HIT SFE EEYII" 
13 GETG ま は 和 = リリ "0 ョ TF ロ = リリ "THEN1 

14 BHTOD13 


、、 ボリ ェ ッ ト MY パコ カセ ッ ト テー ブ ) ( 表 礎 ) 石川 (山形 ) 井上 康 忠 ( 神 攻 高 吉 ( 上 人 西村 英 訓 (群馬 ) 加藤 活 二 
- 7 の (の 人 o ネ 反 、( 界 ) 当 上 区 (高知 ) 大 久保 際 志 ( 良 ) 高松 和 生 ( 語 取 ) 北村 法 六 (岩手 東 洒 到 中 (山梨 ) 満了 


@ ピ ビビ ビビ 、 音波 探知 器 が ひと きわ 高く 鳴る の は 宝 の あり か / @ 遺 中 の 石 の な か に キミ の 宝 が 央 る 


エイ ン シ エ ント アイ ラン 


Ancient lalard (古代 の 島 ) …… 5 
の 島 に は 廃 璃 と な っ た 古代 の 遺跡 が あ 
る 。 この 島 に 伝わる 伝説 に よれ は 、 到 
人 
キミ は 大 金持ち を 夢見 て 、 こ の 鳥 に 
り だ っ た の だ 


FOR AMZ-2000/2200 


ん 1Z-72007 


ト 、 ベ 8 
SS NN 


5E 1 
42 


に 3 
さま 
な 


ミ は カー 
ルキ ー を 押す と 矢印 に 
変わ っ て 進み は じ め る 。 ス ペー スキ ー 


人 


4 
【 】 
4 RG く 江 、 
オミ ミミ ミオ を ネネ を ネネ キネ ネネ ミミ ミミ ネオ ミネ ミミ ミミ ミミ た えた ええ ん 。 石 を 1 ブロ ッ ク 分 崩す こ と が で き 

4 わ つ 、 宝 が 出 て きた だ 。 怪物 に つか まる まえ に / ャ クリ / と 鳴っ 7 い る ee 
画 変 数 リス ト 。 50 宝 の 位置 設定 ~ 近 い ほ ど 音 が 高く な 
SC Neee 自分 の 座標 ・ 60 スコ ア 等 表示 8 N けれ ば 近 ど 涯 ] よ 
A.B-… 自 分 の 下 標 増分 0 キー 入力 る 。 た だ し 、 こ の 機械 の エネ ル 
X1, Y1…… 怪 物 ( 英 ) の 座標 ・80 自分 移動 、 8 5 
ZX.ZY……- 怪 物 ( 敵 ) の 座標 (演算 用 ) ・ 90 石 を 破壊 する か ゃ ギー は 石 な の で 、 と きど と き 
AS$( )…… 石 の キャ ラフ マ 。 100 自分 の 座標 前 方 の キヤ ラフ マ の 生 た で R 
R oe っ 面 数 の 判定 石 を 朋 きだ いと だ め 。 
swes 以 当 ・110 自分 ・ 宝 の 表示 ナ 。 
ee が シャ スコ アア 5 120 面 フ リア 処理 わ よ ( 参 ) を 半 き もち ら し 
C…… 自 分 の キヤ ラク タ ・130 音 を だ す な が 3 ョ いか け て 
TX.T ヤ …… 宝 の 座標 ・140 わな の 表示 * が ら キ ミ を 師 
XX. ヤ ヤー…… 破 壊す る 石 の 座標 ・150 欄 物 ( 敵 ) の 秘 動 ・ 表 示 る 怪物 ( 箇 ) に つか ま ら な い 
KK あお oo キー 入力 ・160 一 180 ゲー ム オ ー バ ー 処 理 上 M SS 
田 プロ グラ ハハ の 説明 。190-200 石 の 破壊 処理 上 グ Wo ウ ま 4 玉 ( 〇 ) を 
10- 20 初期 設定 。210 キー 入力 判定 1 
30~- 40 画面 設定 ・ ' 掘り あて て くれ / 


10 CONGHLE C4OR: TEMFU 7:DIM 人 Q ま (4):Q ま (1)=" 園 ": も (2) = リ 放 り も ( う ) = リー リョ ドニ 1 に に ユ さ 9 

つ 〇 OX= ニ 19:Y マ =1 で ミア メニ 19:ZY= ニ SEX1=ZXsY1= ニ ZY: ビ =1 マ る 4:PUEE ま 95 デ OO DEF EEY(7) =FUKE ま 955 つ 1661 
る 0 も =BTRTNB も ("ポリ 9) iPERINT" 宇 すり も 5FHRT=1THS1:PRINT"K "3 GBPACE 和 も ( う ア ) 5 "PENEXTIPRIN 
TQ も 人 まり D"+ す STRTNB ま も (人 Q 和 ま (1) 。16) す "TSBTRTNG ま (人 Q ま (1) 。16) : FUR エ T=1TOU18B: = 人 n 和 ま すり の a リ ENEXT 

40 FUR 1!=1 TO :CURGHR ミ 。 エ +2 PRTINT ま CURSHR ュ エ +11 5:FRINTR も NEXT: TI も ="OOO0000 "3 品 = り 
ら D TX ニ INT(RND( 1 ) ネプ)+1: TY=INT(RND( 1) *G1)+2ETF CHARACETER 和 も (TX』TY) ER ま (1) THEN ら 50 
60 CURSJRX』 Ys: PRINT" 回 SCOERVSGI" HIT 一 CHER THS GTQAGE "si RI ITFE に まま SS THENL も = ド " 各 
70 BET ド ま BUSUB で 10: ITF (= ニ O)*(B=O) THEN 90 

0 ビニ (フー) *BG(A) / コ オキ (ミーBE) * 人 BB(H) /G+12 日 : TF し 生 = ド 生ま THEN X ニ X+ 全 5 マニ Y+ オ 月 

90 ITF ド ま = " THEN に ま = し まま 』BDSUE で 103 XX ニ X+nIi YY=Y+E: BUSUE 190 

100 ま =C じ HARACTER も ( X』Y) : IF (ロニ 内 生 (1 ) ) 二 ( 口 和 まま (で ) ) 二 ( 口 和 ま = リ ネネ り ) THEN X ニ Xー 且 : Y= ニ YーB 

110 CURSDR X』YiPRINTCHR ま (C) 』 IF CHRRACETER ま (TX。TY)=" "THEN CURSODR TX』TYIFRINTP0O" 
12O IF (X=TX) ※(Y=TY) THEN MUSIC"A3AAARRA" 1 ロニ ラーR*※100K( 避 30/R+ コ ) 5 ドニ =R+ 1 : GUT SO 
1 る O ITF VQL(T1I ま も ) エ DO/R+ THEN PUEE ま OF1A。SBR((TX-ーX) “で +(TY-Y) で で)+1 3 USR( ま OF 1 4) 

140 CURSOR X1。Y1iPRINT " "ETF RND(1)R/5O_ THEN CURGHR X1』Y1sFRINT の 

150 Z メ ニア X+SGN(Xー こ X1).R/《 ろ 。BTR) 2ZV ヨ コ ZYTSGN(Y ご 1DWR/KZ2o9 よ RTX1ーINITZKSM 人 4 ラニ ANN SE 
URSHR X1。YisFPRINT " 草 " り saTF ((X1ESEX)+(Y1EEY) ) 衣 ( 品 和 まく 2 リリ) THEN 69 

16O CURSUR1 さ 』。12IFRTINTTREFLRY (Y/N) "= BET ド ま : IFE ま ="Y"THENH=Hー(HES)※(ーH) : BUTU1O 
170 IF ド ま ="N" THEN FUHEE ま 952 166: PUEE ま OF 1 人 8 ょ 96: END 

18O BUTU 160 

190 F=OsFURI=1TU2EF= ニ F+( 仙 も (T)=EHARRCTER ま (XX。 YY) ) *(-I):NEXT Ii:IF P=O THEN_ RETURN 
っ OO _MUGTC"CO" Es CURGHR XX。YY:PRINTA ま も (F+1 ) :TT 和 本"OOOO000" 1 コ = コ +F' E+1: RETURN 

210 ロニ (ドニ "4 リリ)ー( に も あ = リ りら" ) :B= ニ (ドド 生 = リ B リ )ー( 選 = モリ ジリ 5) iRETURN 


剛 N、 (古代 の 島 〉 中 央 の ハー ト ガ 自分 。 カ ー ソ ル を 動か す と 矢印 に な つて 、 あ ちこ ち を 掘 の ながら 宝 を と る ゲー ム 。 宝 の ある ほう 
に 近 こ な る に つれ て 、 音 が 大 きこ な る 。 掘ら な いで ウロ ウロ レ て いる と 音 が 消え ちゃ う の で 、 上 手 ぐ な っ だ ら や っ て みて 。 77 


補 77727079- ク アル 一 テー ビ ソ と ン ロ ン 契 厚 / 


ファ ミコ ン 1 画面 バイ パー カー レー シン グ ゲ ー ム な の じゃ / 


し @7 大 大 フワ ログ ラム 7 ウノ 


9」 
ファ ミゾ ソー ベー シッ ク 


T エト ME 1 らら 


A ご これ は 画面 の 一 部 分 で す (も ちろ ん ) カチ ヤ カ チ ヤ カ チ ヤツ と 


変 数 リス ト 25-- 35 画面 作成 


・60-- 70 車 の 物 動 。 ゴ ー ル 負 理 
・80 ゲー ハム オーバ ー 処 理 
。90-100 リブ レイ 待ち 

10- 20 初期 設定 : 


19 X=19:Y=119:SPRITE ON:CLS 
29 DEFSPRITE9 , (9, 1 ,9,1.9)=" ホ 
へ ASY” ESPRITE9 ,X,Y 

25 FORJ=TO26 :LOCATEJ, 19:PRI 
NTCHR$ も (227 ) : NEXT 

39 FORI=19TO13:LOCATE27 , Ii : PR 
INTCHR$( 226 ) : NEXT 

35 FORL=9TO26:LOCATEL , 13:PRI 
NTCHR$ も (227 ) : NEXT 

49 PLAY"O02A2R5A2R5A2R503A5" 
45 FORU=599TO9STEP- 1 

S9 LOCATE19.9:PRINT "TIME "ijR 
1GHT$ も (“" SR 3) 

69 P=STICK(9) 

/0 X=X-(P=K) :K=1 -P:SPRITE9 , X 
ぅ Y・1FX=229THENPLAY "03CDEFGAB 
04C" ECLSELOCATE8 ,19:PRINT "SC 
ORE" ji:U:GOTO 9 

69 NEXT:PLAY"O1C6" :CLS:LOCAT 
E19,14:PRINT " シ ^ カ ン キ ~ レ " 

99 IFSTRIG(9 ) =1THENRUN 

199 GOTO 98@ 


ハイ バー オリ ン ピ ビ ピック の 要領 で 車 は 走っ つて いく の で す 。 


の わ っ 、 ハ イ バ パー レー ス 
と いう 感じ で 、 い や あ フ ァ ミ リー ベ 
ー シ ッ ク の 1 画面 らし い 作品 で す 。 
左 の ほう か ら 出 て くる 車 を も 、 コ ント 
ロー ラー の 宮 ボ タン を 使っ て 走ら せる 。 
走ら せ 方 は 、 この ボタ ン の 右 方 向 の と 
この 7 だ けり の カタ カメ カタ スッ と す は ほや く 
だ だ きつ づけ れ ば いい の だ 。 ハ イッ バ パ ー 
リン ビッ ク と 同じ だ ね 。 も ちろ ん 。 
お し っ ぱな し に し て いる と 動か な いし 、 
タイ ミン グ が わる いと あま り 効 率 的 に 
は 動い て くれ な いよ 。 

行 番号 を つけ ず に 、 
CGSE T, 1 |RETURNI 

と すれ ば 、 車 の 色 が 赤く な る 。 だま 
に 気分 を 変え て や っ て みた だ た ら ? 

リプ レイ は 、 ス ター ト ボ タン を 押せ 
(がい いよ 。 
田 参 考 一 - BEEP 1 月 号 『 北 斗 練習 ゲ 
こり 


ボリ ェ ッ ト MY パコ カセ ッ ツ ト テ ー ブ )〉 (山口) 中 島 洋 (新潟) 小林 光雄 (山梨 ) 小林 好 行 C ル 混成 田 勤 ( 葉 ) 木曽 郎 (宮城 
7 ぢ CO) 人 公 o 不 招 大崎 充 浩 (京都 ) 水田 義隆 (滋賀 ) 山本 始 (徳島) 峰 瀬 正高 (岡山 ) 牧野 健作 ( 北 清道 ) 多 津 美 浩二 (兵庫 ) 松原 茂 紀 
。 O 〇 


私 は グロ グラ ム や ら マ シン と いう 実 
存 的 な も の を 愛し て いる 。 よ っ て 、 私 
の 行う 移植 し は 、 つ まり 、 リ メイ ク を 
指す こと が 多い 。 た だ だ 単に 一 応 動く だ 
け で は きび し いか が ら だ 。 

今回 行 3「BALL」 の 移植 は 原作 に 存 
在 し た 欠陥 を 取り 去る こと で 、MZ - 
1500 用 以上 に 、MSX お よび X1 で 楽し 
め る よう た だ た し た だ 。 

『BALL』 の 欠陥 と は 、 パ ズル 型 の ゲー 
ム に あり が ちな 画面 構成 を し て いる に 
も 5 か か わら ず 、 ノ パズル 性 を 強力 に 欠い 
て いる と いう 点 だ 。 フ パパ ズル 性 を 欠い て 
いる の は 、 ゲ ー ム に お ける 面 の 構成 が 
自由 で な い の と 、 ボ ー ル の 動き に 不 確 
定 要 素 が ある と いう 、 プ ログ ラム 技術 
で か ん た ん に 取り 去る こと の で きる 部 
分 で ある か らし て 、 ゲ ー ム の リメイク 
は か ん た だ ん に で きる ! 


画 ま ず 応 を 和仁 る た め の 
キャ ラク 夕 に 注 選 / 


MSX 用 に 移植 す る 場合 、MZ -1500 が 
持っ て いて 、MSX に な い 機 能 を 把 所 


| 


2 


三 > 
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ル 


T IME : 236Sec 
ム MSX『BALL, の 画面 。 ボ ー ル は 3 繕 で スリ ル が 大 きく な つ だ 。 


せ ね ば な ら な い 。『BALL』 で は 、 ユ ー 乾 


ザー 定義 キャ ラク タ 機 能 だ 。 

マニ ュ ア ル に は 書か が れ て いな い が 、 
MSX は 、BASIC で サポ ー ト さる れ て い 
な い が 、 こ の 機能 を 持っ て いる の で あ 
る 。SCREEN1 の モー ド の 場合 だ と 、 
VRAM の 0 一 &H7FF 番 地 の 内容 が キ 
ャ ラク タ と し て 表示 る れる か ら が だ 。 
この へ ん の 詳細 は 『 秘 技 ・ キ ャ ラク 
タ 定 義 』 を 参照 し て は ほしい 。 
画 ゲ グー ム の メイ ンジ 

ググ 方 選 反 を 考え そる / 
全 同 の プロ グラ ム の メイ ン は 、 な ん 
と いっ て も 4 方 生 反 射 だ 。 最 も か ん た 
ん な プロ グラ ム で 、 か な り の 動画 的 効 
果 が 上 げ ら れる の で 、 使 っ た こと の な 
い 人 は すぐ に 、 プ ログ ラム の 一 部 に 応 
用 も で みる 2 ぐ き だ 。 

4 方 向 反射 し は 、 そ の 名 の と お り 、 
4 つの 動く 方向 を 持っ た 物体 (BALL』 
で は ボー ル ) の 動き を ディ スプ レイ 上 
て ジミ ュ レ ー ト する こと 。 だ だ し 、 革 
確 に シミ ュ レ ー ト する だ け で は ゲー ム 


imiillliHititititititiiiiii 


と し て 楽し く て な い の で 、 今 回 は 、 い く 
つか の 特例 を 設け て ある 。 『 ボ ー ル の 
反射 の 仕方 の 基礎 知識 」 の 凶 を 見 て も 
ら え ば わか る よう に 、 グ ログ ラミ ング 
も 生 な さき うに し て いる の だ 。 

サン ジン ワル デ ロ グ ラム を 夫人 和仁 し て みる 
と わが る よう に 、IBALL』 て は 1 つ だ 
っ た ボー ル を 2 つ に し て ある (リス ト 
の 150 行 に ある M=1 を 変え る と ボー ル 
の 数 が 変わ る 。 例え ば M= 2 と する と 
ボー ル が 3 つ に な る の だ )。 これ は ゲー 
ム 性 を 高め る た め に 行っ た も の で 、 実 
際 ゲ 一 ム に な る と 、 を その 効果 が 大 変 大 
きか っ た (ゲー ム で は 速度 を 上 げ る た 
め に 、 こ の 部 分 を マン シン 語 に し て いる ) 
まず 、P63 を 読ん だ う え で 、 移 植 版 
を 打ち こみ 、 遊 ん で みて は しい 。 

うう む 、 簡 潔 な 文章 だ 。 
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4X1『BALL , の 画面 。 ほ と ん ど 同 じ ( あ だ り ま え か 〉 


_、 ボリ ェ ッ リト MY パコ カセ ッ ト テ ー ブ ) (佐賀 県) 江口 勇次 (島根) 津 閑 (徳馬) 杉 橋 了 郎 ( 長 因 ) 山下 健一 ( 折 ) 大 林 里 美 一 以 の 
-(⑨ 生 作 o 上 40B の みな さん に お 送り し ます 。 お めで と う 。 


AO 
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199 SCREEN 1:WIDTH 32:KEY OFF:CLS 390 IF DX=9 THEN XH=-XH ELSE YH=-YH 
119 GOSUB 1919 499 GOTO 449 

129 419  X(I)=X1+XH:Y( 1 )=Y1+YH\32 

139 ' SAMPLE 429 LOCATE X(1 ),Y(I):PRINT B$: 

149 DEFINT A-Z 439 LOCATE X1,Y1:PRINT S$ 

159 M=1 449  XH(I)=XH: YH( 1 ) =YH 

169 DIM X(M) ,Y(M) ,XH(M) , YH(M) 459 NEXT 

179 C=128:K$=CHR$(C) : B$=CHR$( 153 ) : S$=CHR 469 GOTO 3969 

$(131 ) 479 : 

189 LOCATE 1.9:PRINT STRING$( 29,K$) 1999 SET PATTERN 

199 FOR 1I=1 TO 22 1919 FOR I=1 TO-16 

299 LOCATE 1.I:PRINT K$:STRING$( 27,S$) :K 1929 READ D 

も : 1939 FOR J=9 TO 7 

219 NEXT 19409 READ D$:VPOKE DX8+J,VAL( "&H"+D$) 
229 LOCATE 1.23:PRINT STRING$( 29 ,K$) : 1959 NEXT 

239 : 1969 NEXT 

249 FOR I=9 TO M 1979 VPOKE &H2019,&H89 

259  X(I)=INT(RND( 1 )x28)+2 1989 VPOKE &H2911.,8&HF9 

269  Y(I)=INT(RND( 1 ) 21)+1 1999 VPOKE 8&H2912,8&8H59 

279  XH(I)=1+(RND( 1 ) く . 4 ) x2 1199 VPOKE &H2913.,8HA9 

289  YH(I)=(1+(RND( 1 ) く . 4 )x2)x32 1119 RETURN 

299 NEXT 1129 DATA 128,7F,7F,7F、99,F7,F7,F7,99 
399 : 1139 DATA 131.99,99,99,99,99,99,99,99 
319 FOR I=9@ TO M 1149 DATA 139,7F,7F,7F,99.F7,F7,F7,99 
329  X1=X(I):Y1=Y(1):XH=XH( 1 ) :YH=YH( 1 ) 1159 DATA 153,3C,7E,FF,FF,FF,FF, 7E,'3C 
339 AD=&H1899+Y1x32+X1 1169 DATA 145,81.42,24、18、18,24,42,81 
349 DX=VPEEK(AD+XH) AND 1 1179 DATA 129,96,98,76,E7,FD,FB, 7E, 2C 
359  DY=VPEEK(AD+YH) AND 1 1189 DATA 137,98,98,8B,EB,1C,29,49,C9 
369  D=VPEEK(AD+XH+ YH ) 1199 DATA 139,8C,C8,28.19,1F,19,9C,9C 
379 IF (D AND 1 ) =1 THEN 418 1299 DATA 141,.93.92,.94,38.D7,D1,19,19 


389 1F DX=DY THEN XH=-XH:YH=-YH:GOTO 4 1219 DATA 143,39.39.98,F8,98,14,13,31 


AI も も ル ル メ ネ ル キ ト ャ ネ ス ド ト ま が た は まま まれ 演 丈 光 の も を まま あき を デマ タタ スウ シン 


@ け ンプ ブ ルプ ログ ラム の 解説 

還 プ ロブ ラム の 説明 一 変数 リス ト 

100-290 画面 、 変 数 の 初期 化 を 行う X(n).Y()…n 番 目 の ポ ボー ル の 座標 

310-450 ボー ル を 動か す XH(m.YH(n)-……n 番 目 の ポ ボール の 動く べべ き 位置 を 算出 する だ め の デ ー タ 。 


1000-1210 キャ ラク 々 定義 


@ ボ ポー ル の 反射 の 仕方 の 基礎 知識 


反射 物 と は キャ ラフ タコ ー ド が 偶数 の キャ ラフ で ある と 決め だ 
@ ボ ー ル は 冬 め の 4 廊 向 に 動 ご 
⑥ 反 射 物 に 当 た つ だ と き は 次 の よう に 反射 する 


反射 物 が 横 に 2 つつ 以 | 
征 ん で いる と ころ 8 
⑩-⑥ は 球 の 動く 状態 を 示し て いま す ! si 
157 ム 反 射 物 が 約 め に 
並ん で いる と ころ ャ 反射 物 が 独立 
し て ある と ころ 
< 反射 物 が 終 に 2 つ 以 
人 W 上 光 ん で いる こと ころ 


グ P 反射 物 ガ カギ 型 に 2 
必 も な ら うら で いる ど と ご ろ は 次 に 動く べき 座標 に 
レス レン ある 反射 物 
< 1 は た だ の 反射 物 
加 Mas 
以上 の 反射 を プロ グラ ミン グ す る と 、 サ ンプ ルプ ログ ラム の 320 て 440 行 の よう に な る 。 


2 の ポシェ. ッ ル トー (パフ コン ソフ ト >〉 今回 は 2 名 に 1 万 円 以内 の ソフ ト を あげ ちゃ うと いう Bi な 企画 。 で も ポケ コン ユー ザー を は じ め と する 
@- 住 公 o 本 上 や の みな さん に は 、 ちよ つと 不 公平 だ ぜ つ だ ね 。 ご めん な さい 。 え ー と 、 彼 ら の ヒン シュ クコ ー ル の 中 で 選ば れ だ 2 名 は !? 


2 
577 R 


秘技 ・ キ ャ ラク ダ タダ 定義 


(①DMSX で は 図 - 1 の よう に キャ ラク  ② よ っ て 、 ユ ー ザ ー 定 義 キ ャ ラク タ  ("&H'+D$) ・NEXT PRINTTA" ・ 

タ の パタ ー ン が VRAM に 入っ て いる 。 と し て 図 - 2 の よう な キャ ラク タ を DATA 02, 15, 12, FE, 10, 5 
図 -1 定義 する に は 、FOR |= ニ 0 TO 7: 54, 10 と な る 。 

READ D$ : VPOKE &H208 十 | VAL 


VRAM アド レス 


&H208 
&H209 

&H208 &HZOA 
&H2OF &H20B 
&H20C 
&H2OD 
&H2OE 
&H2OF 


&H7FF 


③ ユ ー ザ ー 定 義 キ ャ ラク タ に 色 を 付け る に は 次 の よう に 
行 を ば よい 。MSX の SCREEN 1 で は キャ ラク タ 8 つ に 
付き 、2 色 (背景 色 を 含む ) が 指定 可能 な の だ ( 図 3) 

例え ば 、VPOKE &H2008, &HF 4 と する と 、(③⑬、A、B、 
C、D、E、F、G に 対応 し た キャ ラク タ が 青 地 に 臼 で 表示 
され る よう に な る 。 &H201F 


&H2008 


形 婦 放 74 ルル ん / で 送 ん で みよ フ / いる と ころ も ある 。 


と いう わけ で 、MSX(16K 以 上 人 名 | 『BALL』」 と だ いだい 同じ 。 だ だ 、 ボ ちな み に 、MSX 版 も 1 版 も は こん 
シリ ー ズ の それ ぞ れ に 移植 し た リス ト 一 ル が ザ 3 つ に な つて いる こと 、 そ れ ガ が ど プ ログ ラム は 同じ な の で 、X1 用 リス 
を 掲載 し て お ご こつ 。 ら 、 出 口 に 和信 が は いり こめ な いよ うに ト の プロ グラ ム 解 説 は 省略 し た だ 。MS 

遊び 万 は 、63 ペ ー ジ 、 MZ-1500 用 の な つて いる こと な ど 、 ち よ つ と 変え て X 版 の 解説 を 参考 に し て ほし い 。 


@FOR MSX(16K) BALL 


379 GOSUB 3919:BL=M+1:BF=9:TIME=9:T=249 


* 199 ‥ THE BALL 5 389 : 
8 119 『 ORIGINAL VERSION BY K.K 399 LOCATE 19.23:PRINT USING" 昔 間 杜 "iTS * 
* 129 『 ENHANCED BY DEBU 499 LOCATE 8,23:PRINT USING" 韻 半 寺 條 " 1 5Ci 
6 139 : 419 IF BL>9 THEN 469 。 
* 149 『 INITIALIZE 429 PLAY"S1M199905CCCDDDCCCABABAB" に 
1 159 SCREEN 1:WIDTH 32:COLOR 15.9,.9:CLS 439 IF PLAY(9) THEN 439 s 
* 169 KEY OFF 449 PC=PC+1:SC=SC+TX19g:GOTO 269 
N 179 CLEAR 399,&HDFFF:DEFINT A-Z:M=2:P=1 459 : 人 き 
D 189 DEF USR=&HE999:WRK=&HE9C8:HI=1999 469 IF T>9 THEN 659 上 
・ 199 DIM C$(2) ,H$(3) 479 LOCATE BX,BY:PRINT C$(9)::BF=9:TIME= * 
* 299 B=128:G=139:0=145:S=131:BO=129:BA=15 9 8 
3:C$(9) =CHR$(S) :C$( 1 ) =CHR*(B) :C も ( 2) =CHR$ 489 NN-1:LOCATE 26.23:PRINT USING"& _ &" e 
* (0):FOR 1I=9 TO 3:H$(T)=CHR$(137+Iw2):NEX STRING$(N,H$(3))::IF N>9 THEN 599 
T : BO$=CHR$( BO ) : BA や =CHR$ も (BA) : G や =CHR$(G) : 499 PLAY"S19M1999CDCDDEDEFFF" x 
$=C も (9 )+BA$+BO$+C も (1 )+G$+C$( 2 ) 599 IF SC>HI THEN HI=SC 
・ 219 GOSUB 2919:GOSUB 1919:PLAY"T255L64" 519 LOCATE 11.8:PRINT "GAME OVER" 上 
* 220 : 529 LOCATE 11.19:PRINT "YOUR SCORE" ・ 
5 239 GAME START 539 LOCATE 16,11:PRINT USING" 提 揚 拉 井 #" 15C 
e 249 : 549 LOCATE 11.12:PRINT "HI- SCORE" . * 
259 N=3:SC=9:PC=9 559 LOCATE 16.13:PRINT USING" 拉 提 揚 # 寺 "5HI ゅ 
269 ON PC MOD (P+1)+1 GOTO 279.289,299,3 569 LOCATE 19,15:PRINT "HIT SPACE]“" に 
2 99.319.329,339,349.359,360 579 IF STRIG(9)=9 THEN 579 ELSE 259 M 
279 RESTORE 4919:GOTO 379 589 : * 
289 RESTORE 4239:GOTO 379 599 PLAY"S9M199903BBAAGGFFEEDDCCCC" 
e 299 RESTORE 4919:GOTO 379 699 T=(T+1 ) MOD 4:LOCATE X,.Y:PRINT H$(T) * 
399 RESTORE 4919:GOTO 379 ぶ :1=(I+1 ) MOD (M+1):IF USR( TI)=0 THEN BL し = ・ 続 次 
319 RESTORE 4919:GOTO 379 BL- 1 : SC=SC+199:GOTO 879 た 2 
329 RESTORE 4919:GOTO 376 619 IF PLAY(9) THEN 6009 | 
e 339 RESTORE 4919:GOTO 379 629 PLAY"S19M99907C" き さ > 
5 349 RESTORE 4919:GOTO 379 639 : 8 
e 359 RESTORE 4919:GOTO 379 649 ‥ MOVE BY STICK(9) * に 
369 RESTORE 4919 659 1I=STICK(9) 5 


、 ポリ ェ ッ リト パパ ソコ ン ソ フト 当選 者 〉 ジャ ジャ ジャ ジ ヤ ー ン | 発表 し ま 一 す 。 千葉 県 千葉 市 の 山下 勇人 フン (PC-8801mK SR モデ 。 ヶ 
-(⑨・ 人 o 本 ル 30 の コー ザー) と 、 兵 凍 上 明石 市 の 浜田 江 フ ン (CF-2700RAM32KB=MSX の ユー ザー) の 2 人 で す 。 あ めで と う 。 
< 、 の 〇 の 
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669 XH=(1I=7)-(1I=3) : YH=( T エ =1 ) -( [=5) 
679 IF XH=9 AND YH=9 THEN 819 
689 AD=&H1899+X+XH+(Y+YH)x32 


699 ON INSTR(I$,CHR$(VPEEK(AD) ) ) GOTO 78 


9 り .719,769、749.819,819 


7909 


719 LOCATE X,Y:PRINT C$(9)::X=X+XH:Y=Y+Y 


H:LOCATE X,Y:PRINT _H$(1-(XH=-1 )x2+YH) : 
729 GOTO 489 


739 


749 IF VPEEK(AD+XH+YHx32)=S THEN LOCATE 
X+XHX2。Y+YHx2:PRINT C$(1)::GOTO 789 ELSE 


819 
750 


769 PLAY"S9M59906AF" :TIME=TIME- 19899: BF= 


り 
770 


789 LOCATE X,Y:PRINT C$(9)::X=X+XH:Y=Y+Y 


H:LOCATE X,Y:PRINT H や (1-(XH=-1 ) x2+YH) : 


799 
899 
819 


" MOVE BALL 


1=9 


829 D=USR( 1 ) 


839 IF D=O THEN BL=BL- 1 : SC=SC+199:PLAY"S 


19M59904A":GOTO 859 
IF D<144 AND D>136 THEN 489 


849 
859 
869 
879 
889 
899 
999 


1=T+1: 


IF 』 く <=M THEN 829 


PUT BONUS 


T=2409- 


INT(TIME/69 ) 


IF T>39 OR BF=1 THEN 916 
BX=RND( 1 ) x27+2:BY=RND( 1 ) x29+ 1 


IF VPEEK(&H1899+BX+BYx32) く <>S THEN 89 


9 ELSE BF=1:LOCATE BX,BY:PRINT BO$: 
919 GOTO 398 


929 
1990 
1919 
1929 
1939 
1949 
1959 
1960 
1979 
1989 
1999 
1199 
1119 
1120 
1139 
11 4 


0 1159 


1160 


1179 
1189 
1199 
1209 
1219 
1229 
2909 
2016 
2029 
2939 
29409 
2950 
2969 
29790 
2989 
RROR 
2990 
2109 
2119 
2129 
2139 
2149 
2159 
2169 
2179 
2189 
2199 
2299 
22169 
2220 
2239 
2240 
2256 
2269 
2279 
22809 
2290 
2309 
2319 
2329 
2339 
2349 
2359 
2369 
3999 
3919 


SET PATTERN 


RESTORE 1139 
FOR I=1 TO 18 


READ 


D 


FOR J=9 TO 7 


READ 
NEXT 
NEXT 


D$:VPOKE Dx8+J,VAL( "8&H"+D$ ) 


VPOKE &H2910,&H89 
VPOKE 8&H291 1 ,&HFB 
VPOKE &H2912、,&H59 
VPOKE &H2913.8&HA9 
RETURN 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


128.7F,7F、7F,99.F7,.F7.F7,99 
139.7F,7F,。7F,99.F7,F7 .F7,.99 
131 ,99.99.99.99,.99.99,.99,.09 
19d。3 し TEB。FEE FFP。FE。FP、7E,、3C 
145.81.42.24.18.18.24.42.81 
129.96.068.76.E7,FD。FB.7E,2C 
137、98、98、8B、EB.1C.29、49.C0 
139.9C,9C,19.1F,19,28,C8,8C 
141.93.92.94.38、D7,D1.19,.19 
143.39,39,98,F8,.98,14、13,31 


・ POKE MACHINE LANGUAGE 
RESTORE 21269 
FOR L=9 TO 24 


SUM= 9 


FOR !I=9 TO 7 


READ 
POKE 
NEXT 
READ 


IN "5 


NEXT 


D$:D=VAL( "8&H"+D$) 
&HE999+Lx8+I 。D:SUM=SUM+D 


D:IF D く >SUM THEN PRINT "DATAE 


2129+Lx19:STOP 


RETURN 
” MACHINE LANGUAGE DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


3A,F8,F7.87.87,87,11.C8.1175 
E9,83.5F、8A,93.57,DD,21.1976 
99.99.DD,19,DD,7E,99.B7,776 
C8.DD,66,91.DD,6E,.92,.E5,1986 
DD,7E,93,84.67,DD,7E,94,936 
85,6F,CD,B5,E9 ,CD,4A.99,1133 
32.F8,F7,FE,91,28,.71.E6.1327 
91.29.4D,E1,E5,DD.,7E,93、914 
84.67,CD,B5,E9,CD, 4A,99,1124 
E6,.91.4F,E1,E5,.DD.7E,94,1115 
85,6F,CD,B5,E9,CD,4A,99,1133 
E6,91,B9,29,12.DD,7E,93,816 
ED,44,DD,77,.93.DD,7E,94,999 
ED,44.DD,77.94,18.17,79,.817 
E6.91,29,.9A,DD, 7E,93,ED,869 
44.DD,77.93、18.98,DD,7E,799 
94,.ED,44.DD,77,94.E1.C9,1979 
DD, 7E,91 、DD、86,93,DD,77.1946 
91.DD,7E,92,DD,86,94.DD,936 
77.92.3E、99,CD,4D,99.E1 ,843 
CD,B5,E9,3E,83.C3,4D,99,1975 
DD,36,99,99,E1 ,CD,B5,E9,1119 
3E, 83,C3, 4D,99,EB,21.99,733 
99,7A,54.19.29.29.29,29,395 
29,5F,19.11.99.18.19,C9,428 


′ PUT SCREEN 
LOCATE 1,.9:PRINT STRING$( 29.G$) 


っ 2 ジッ 


表 全 


3929 FOR !I=1 TO 21 

3939 LOCATE 1,I:PRINT G$:SPC( 27) :G$: 
3949 NEXT 

3959 LOCATE 1 .22:PRINT STRING$(29,G$) : 
3969 LOCATE 2.23:PRINT USING"SCORE : 丁半 寺 半 
6 

3979 LOCATE 14.23:PRINT USING"T IME : Se 
0 

3989 LOCATE 26,23:PRINT USING"&  &":STRI 
NG$(N,H$( 3) ) 

3999 FOR I=1 TO 21 

3199 READ D$ 

3119 FOR J=1 TO 27 

3129 LOCATE J+1 , 1:PRINT C$(VAL(MID$(D$,J 
旨 記 お 

3139 NEXT 

3149 NEXT 

3159 FOR K=9 TO M 

3169 POKE WRK+Kx8, 1 :READ X,Y 

3179 POKE WRK+Kx8+1 ,X:POKE WRK+Kx8+2,Y 
3189 POKE WRK+Kx8+3,255+(RND( 1 ) く .4)x254 
3199 POKE _WRK+Kx8+4,255+(RND( 1 ) く .4)x254 
3299 NEXT 

3219 READ X,Y:LOCATE X,Y:PRINT H$(9): 
3229 RETURN 

4999 ′ PATTERN DATA 

4919 DATA 222999999999999999999999222 
4929 DATA 2099999999999999999999999992 
4939 DATA 299999999999999999999999992 
4949 DATA 999999999999999999999999999 
4959 DATA 999911111111111111111119999 
4969 DATA 99991099999999999999999109999 
4979 DATA 999919999990999999999910999 
4989 DATA 9999199999999999999999109999 
4999 DATA 9999199999999999999999109909 
4199 DATA 9999199999999999999999109999 
4119 DATA 9999199999999999999999199099 
4129 DATA 9999109999999999999999919999 
4139 DATA 9999199999999099999999109999 
4149 DATA. 99991099999999999999999109990 
4159 DATA 9999199999999999999999109909 
4169 DATA 999919999999999999909919999 
4179 DATA 999911111111111111111119999 
4189 DATA 9999099999999999999999999999 
4199 DATA 2999999999999999999999999092 
4299 DATA 2P9999999999999999999999902 
4219 DATA 222999999999999999999999222 
4229 DATA 8.7.23.15。.15.2, 17,10 

4239 DATA 9999109999199999991909919999 
4249 DATA 999919999199999991999919900 
4259 DATA 9999199991999999919999109999 
4269 DATA 999919999199999991999919999 
4279 DATA 111111111111111111111111111 
4289 DATA 99991099999999999999999109999 
4299 DATA 9099919991999999999199919999 
4399 DATA 9999199091999999999199919999 
4319 DATA 999919991991111199199919999 
4329 DATA 999919991991222199199919999 
4339 DATA 999919991991222199199919999 
4349 DATA 9999199919919991991999199099 
4359 DATA 9999199919999999991099109999 
4369 DATA 999919991999999999199919999 
4379 DATA 9999199919999999991999109999 
4389 DATA 999919991999999999199019999 
4399 DATA 111111111111111111111111111 
4499 DATA 999919999199999991999919999 
4419 DATA 999919999109999 り 99190999199099 
4429 DATA 999919999199999991999919909 
4439 DATA 99991099991999999919999100990 
4449 DATA 2,1.28.2。17.29, 16.14 
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チェ ッ ク サ ム "/ 


特許 念願 中 (No141421356) 
2000 行 か ら の マシ ン 語 書き 込み プロ ブラム は 、 デ 
ー タ の 自動 的 照合 を 行い 、 デ ー タ に 誤り が ある と 
判断 し だ 場合 に 、DATA ERROR IN xxx 
X と 誤り の あつ だ 行 番号 を 指摘 し て これ ます 。 こ ご 
れ ぐ れ も 、 こ の エラ ー メ ッ セ ー ジ の こと で 編集 部 
に 電話 を し な いで こく だ さい 。 ま だ 、 ご この 廊 式 を 自作 | 
の ゲー ム な ど で 使 いた い 場合 、 ポ ボ シ エ ッ ト な どの 、 | 
テク ノボ リス 関連 誌 へ 投稿 する 際 に 限り 、 大 鈴 迎 
て ず 。 


く 山梨 県 ・ 河 野 真 知子 サン 〉 この まえ 、 編 集 室 に 遊び に いつ だ と き は 、 さ ぞ 驚 いた こと で し よう 。 バ パー モン ドカ レー の ルー を 
プレ ゼン ト し だ ん だ も ん 。 で も 中 味 は キヤ ン デ て ィ だ つ だ で し よ 。 か が ん べ ん し て ね 。 六 マイ ツ ダ ! どう も ご ち そ うさ ま 。 立 


つ 
て 一 
ーー 


の 目 
つう 


ーー、 
に 
ーー、 


ら と し て 、4220 
空 曰 、1 ニプロ 


ボー ル の 出口 と いつ う 数字 を 使 つ 


n と し て ボー ル の 数 


つ 
て 一 


By the wav、 面 の デー は 画面 表示 


直結 し て いる の で か ん だ ん に 作れ る 。40 


10 一 4210 行 の よう に 、0 


ツウ 2、 だ 


気味 が 悪く て 、 と つて も 楽し い の で す 。 
で 、 今 回 は 第 1 回 を 記 菅 し て 、 キ 
作 面 を 応募 する 。 面 パ バターン の デー タダ と M 


の 値 が わる よう | 


170 行 の M1 を M 
が 変え られ る 。 ご この 場合 、 面 パタ ー ン の デ 


ー タ の うち 、 ボ ー ル の 初期 位置 の 数 を 変え 


な いと ダメ 。 例え ば 、M 


田 人 meSSage frTOm “Nop chaser“ 
ロイ 。 


(一 般 名 チエ ッ フ ポイ ント ) 
14,17.20.17.10. と する と ボー ル が 6 コ | 
な る (2 面目 も デー タ を 直さ な いと イケ ナ イ 


ぞ ) 
「NOD ChaSer の THE BALL 保 」 まで 


て 、 自 分 の 好き な 和 面 を 作 つ て みる と 、 オ モ 
送る こと 。MSX.X1 ど ちら で も CK ! 
まぐ 、 山 科 さ ん の 許可 が 取れ だ ら ボ シェ エッ ツ 


ト No.4 に 載 ね る ガ も し れ な い / 


行 を DATA 8.7.23.15.15. 15.2. 6. 16, 21. 


ec 
に 
ご 

アン 


0 で 
ー0 


ON、1 


/ 


> 


ノ 


… ボ ポー ル の デー ベタ 格納 番地 (先頭 ) 


: ハ イス コア 


で ZN に 旬 


で ボー ル の 出口 ) 
各 方 向 に 動い て いる 人 の キヤ ラフ 


コ 
We 


- 人 の 動く べき 方 向 を 算出 する 


・ ボ ー ナ ス の 出現 し た 位置 


空白 、n 
XY…… 人 の 座標 


5 8 
| ゆ …… 人 が 動く 時 の 判定 用 文字 列 。 空 昨 ボ 


- 面 表示 用 の キャ ヤラ クタ ①「 


⑳) 還 回 
ドレ ス 
その 他 い ぐつ か が 


ー ル 、 ボ ー ナ ス 、 プロ ッ ク 、 外 壁 、 出口 
T…… 残 り 時 間 ( 秒 ) 


の 順 で キヤ ラク が 並ん で いる 。 


残り の 人 の 数 


Cx スコ ア 
・ ボ ー ナ ス 表示 フラ (0 


一 会 


沈 し て か 


「 ソ 


ャ 一 全 


AD…… キ ャ ラク タコ ー ド 読み 出し 用 の ア 


PO-……- 現 在 の 面 数 
BL…… 残 り の ボー ル の 数 


HS(n)… 
BF…… 


WRK- 
HI 
eS: 
NN… 


ここ 


本 電 。 


イ 


ーー 


行 つ 


つ 
て ー 


・ ボ ー ル に 当 を つ だ と き の 和 負 理 
640 一 780… カ ー ソ ルキ ー の 入力 に より 人 
リ に 書き こむ 
3000~3220 … 面 の パタ ー ン を 表示 する 
5 男 の パ ター ン デ テー タダ 


ちち オ ルー リ リー 判定 
一 変数 リス ト 


490-570… ゲ ー ム オー バー 処理 
・ ボ ー ル を 動か す 


イズ 
ヤラ イズ 

390 と 400… ス コア 、 残 り タ イム の 表示 
を 動 ひ す 


250P970" ウ サー ム 1 下さ | 
… タ イム オー バー 判定 


… 面 リア 判定 
470-480… ツ イム オー バー 負 理 お よび ゲ 


420 一 440… 面 クリ ア 処 理 
・ ボ ー ル の 個数 


150 ご 210… 1 度 し か 行わ な か い イ ニシ ャ ラ 
P…… 最 大 面 数 一 1 


1000ー1220 … キ ヤラ 定義 を 
2000-2360 … マ シン 語 プ ログ ラム を メモ 


還 プ ログ ラム の 説明 


410 

460 
590 て 620・ 
610 一 900 
4000 一 


77SX 放 4 ルル を 艇 
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ヤン = 上 9=dWIL:9=d ヨ :1+=71 ヨ HE9I9E IISO5 
919? ヤ ddOLSdd 

99E OLOD:9I9 セ ddOLSdd 

99E OLOD:9I9? ヤ ddO0ISdd 
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(0) 
96! 
98! 
9/【 
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よ 、 何 度 も どん な 用 だ 


ーー 
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本 目 は 、 彼 が 知 つ て いる 長い 逆さ 言葉 を 教え て くれ まし だ た 。 ア リガ ト ネ 。 1 カラ ブラ ム 。 立 
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9990190999999099999999999999999999I9999 VIV 999 セ ャ ( .O8928Z9EL9998I8199999999d4/9/9181 つ 899999999999191,)$HHOX ヨ H=(6ET)$HO ddd 9691I 
9999IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIBB99 VLVO 9G9 ャ (』91991OZ つ 9 も 9Z91991919d8H8E99999999991OI つ 99999919。)$HHOX ヨ H=(T ャ 【)$HO dd 9891I 
90999999999999999999999999999999999999 VILV 9 セ 9 セ ャ ( ,L5 く [1 つ 99899818199999909 つ HO[918IIE99999999998181,.)$HOXH=(5E も 【)$HO ddd 9Z9! 
と 999999999999999999999999999999999999C VLV 9E09 セ ( ,9999Z99999ZIV999HGdddHd ヨ HG9999999999Z99999999999,)$HHOX ヨ H=(6ZT)$JHO dd 9991 
9999999990999999999999999999999999999Z VLV 9Z9 セ ( ,.999999999999999999/d/d/d99d/d/d/9999999999999999,)$HHOX ヨ H=( 9ET)$HHO dd 9G9I 
くく 99999999999999999999999999999999CCC VLVO 9I9 セ ( ,.999999999999999999/d/d/d9d/d/d/9999999999999999.,)$HOXH=( 8Z[)$HO dd 9 ヤ I 

VIVd N ヨ W  . 999 セ TXHN :$d+$d+$d=( う )$dHO dd 9E9I 

NdIL ヨ a 99IE TXHN :(V)$HO+$d=$d:((8'(8'(V)$NId+ 

:*(9)$H LNIdd:A'X LVO0T:A*X dV ヨ H 9ZIE rg999999,)$LHDId+,9。)$1d ヨ 1+ 8.) VA O V=V:((I"1'③)$dIN) つ SV=V:9 01 [=I 0d 9Z9I 
IXN 991E ( う )$LVdD り う =$d : =$d:d2HS OL 9CH3= う 0d 9I91 

ャ GZx(? ヤ ">(1)dNH)+GGZ' ヤ +9x+JHA JOd 8GIE NdJHLLVd IS  , 999I 
ャ GZx( ヤ ">([)dNd)+GGZC'E+9X+JHA JO0d 9 も IE : 968 
ん "て +9X+JHW JOd:X*「[+9XJ+JHW JOd 9EIE 99E 0IO5 9989 
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ら カ ラグ ラム 。 立 


A'X dV ヨ di:I'8X+JHA JOd 9ZIE :$Od LNIdd:Ad'Xd dLVO01:T=dB ヨ S1H 998 NHL (9)$ つ <>( Ad ヨ *' Xd )$ddLOVHVHO 』I 9/9 


0 9= 0』 9IIE [+[C※([)dN=Ad:C+8EX(1)dNd=Xd 998 

LXHN 99IE 988 NdHL [=dd 0 9E<[ 』I 9G8 

LXHN 969E NIL-9 ヤ <=[ 9 ヤセ 8 

:(((ITF*$d)$dIN)TVA)$ つ INIdd: IP EVO0T 99 と SIINOd Lld ,・ 9E8 
8E 0 【=P 0』d 9Z0E 96/ NdHL =>I dI:I+I=ji 9Z8 

$d dVdd 9995 99? NdHL 9EI<d QNV fr【>d 』I 9!8 

cc 0 【!=I 0』 9G9E 9Z8 OLOD:,V も 0.AVT1d: 991+OS=OS :【-71 ヨ =T1HH NHL 0=d 』I 998 

*((E)$H'N)$DNIJLSE,.8 8,.DNIS(1 LNIdd: ャ も Z*ZE dLVO0T 9 も 95E (1)dSil=d 964 
・ 上 に つ 9S 提 拉 寺 WIL,DNISH LNIdd: ャ <'8[ LVO0T 9E9E 9=I 98/ 
: つ S:。 提 提 提 韻 拓 HHOOS,.DNIST] LNIdd: も く * ヤ LVOO0T1 9Z9E TIVd AOW ・ 94// 
d'/$ り "(EZT6E)-(9'9) ヨ NIT 919E ・ 99/ 

NdddOS (ld , 999E ・(HA+C※(【-=HX)-【)$H INIdd:A'X dLVOOT1:HA+A= 和 AE:HX+X=X::(9)$ つ LNIdd:A 人 "X dLVOO] 9GZ/ 

9? ヤ "99'99'99'6O'd も "ヤヤ "69'9E VLVQ 995EZ ・ 9?/ 
【Z<"99*[9'69'"』J ヤ *6Z'6Z'6Z'69 VLVQd 9GEZ 9=dd:981-dMIL= ヨ NIL dV90.AVT1d 9E5/ 
96G'6Z'6C'"d① "ヤヤ "99'9Z' つ /*62 VILVQ 9 も EZ ・ 9Z ん 


oooooooo oe 


〈《 め みち や ゃ ん トマ ト 〉 ぐい だ い が は が いだい ご 一 (食い だい が 、 歯 が 痛い フー) (長野 県 ・COPY) 立 2 本 目 は 、 あ きら か 


に オリ ジ ナ ル だ と わか る 作品 。 テ フ ノ ポ リス 編集 室 に いる 人 と 、 読 者 し か わか けら な い ネ 。 最 高 だ ネ ! 


02 の 0 が 
Ye 


使用 し て いる BASIC や モー ド 、 オプ 
メモ リ の 容量 な ど を 確 
か ゆめ て か ら 打 ちこ み を は じ め て くだ る 
い 。 特に MSX に つい て は 、@8K、 16 人 K、 
32K、64K の 各 機 種 に つい て ひと つ ひ 
と つっ 動 く か どう か を 確か め て いま す 。 
8K と あれ ば 、 全 て の 機種 で 動き ます が 
16K と 上 な っ て いる ブロ グラ ム は 、8K で 
は 動き ませ ん 。 た だ だ し 、8K の 機種 で も 
ォ プ ショ ン を つけ て メモ リ の 拡張 を す 
れ ば だ いじ ょ うぶ で す 。 

また 、PC-8801mkIISR の 場合 は 、V 
1、 ス タン ダー ド に セッ ティ ング し て か 
ら 入 力 、 実 行 し て くだ さい 。 


掲載 リス に に つい て 

リス ト は プリ ンタ か らら 打ち出し た も 
の を 縮小 掲載 し て いま す 。 十分 注意 し 
て いま す が 、 も し どう し て も 読め な い 


部 分 が あれ ば 、 編 集 部 まで 電話 で 問い . 


合わ せ て くだ さい 。 電話 番 号 な と は 、 
次 の 項目 を 参照 し て くだ さい 。 


WO LUG 


掲載 プロ グラ ム は 何 度 も チェ ッ ク し 


て いる の で プロ グラ ム そ の も の の バグ 


は ます な か いい 考え て くだ きい 。 だ だ 、 
編集 ・ 印 刷 上 の ミス に より みな さん に 
ご 迷惑 を なむ かけ する こと が と きど き あ 
る こと も 事実 て す 。 抽 う 、 こ うら うこ 
た の よう 益 用 し て いま 0 が ち 
し 、 リ スト が 欠け て い だ り 、 見 えな く 
な っ て いた り 、 何 度 見 直し て も ブロ グ 
ラム が うま く 動 か な か っ た り し た 場合 


主 に は 、 下 記 ま で 電話 で 問い 合わ せ て く 


目 上 有明 


川 則 【 風 則 則 | 四 用 昌 旧 用 用 昌利 利用 朋 則 則 則 則 四則 用 出 利用 用 | 用 用 朋 朋 由 用 用 上 用 由 則 則 則 用 用 利用 用 則 用 則 昌 四則 有川 旨 目 昌 


0 
の (03)295-4610 テク ノボ ポリ ス 編 集 室 
ポシェ ッ ト 編 集 部 

電話 は 、 な る で 〈 月曜 一 金曜 の 夕方 
5 時 一 7 時 の あい だ に お ね が いし ます 。 
また 人 る べく ボボ パン ツラ ンチ 6 
と に お いて 電話 し て くだ さい 。 


ジジ ルル paa くに 
し し C し いま 選ん 

最近 、「 プ ログ ラム が 打ち こめ な い の 

で テー フ ' に モー ブ し て 送っ て くだ さい 」 


と うい うわ け で わこ わこ し ます 。 今 劇 は どん な スロ クラ ム が の っ 
ッ フ ッ フ ッ 、 ま あま あ 、 読ん で みて くだ さい ね 。 
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7/ 
MA バ 


ロブ ラム コー ナー 


パ 


と いう 手紙 が 多く な っ て きま し た が 、 
原則 と し て お こと わり し て いま す 。 作 
者 の 住所 ・ 名 前 も 教え る こと は で きま 
せん 。 ジ ログ ラム は ば は 、 リ スト と お り に 
打ち こめ ば 必ず 動き ます 。 も し 、 リ ス 
ト に バグ が あっ た 場合 、 電 話 や ポシェ 
トド 、 デ ウ ク ナ ポ ボリ ス の パグ コー ナー で 
お 知ら せ し て いま す の で 、 そ ちら で も 
確認 し て くだ きい 。 リ スト の 打ち こみ 
は それ だ け で も プログ ラム の 勉強 に な 
る は ず で す 。 あ きら め ず に が ん ば っ て / 
お 願い 一 一 土 ・ 日 や 休日 、 深 夜 の 問 合 
せ 電 話 は ご 遠 席 く だ さい 。 


拳 ろ 込み ダ タプ アム ム W 分 


cm= 寺 王女 様 を 助け に 行 < 
の は も ちろ ん 王様 

リモ ー ト コン トロ ー ル の 爆弾 を 仕 か 
は て 。、 コ コース ド や を や つつ けり て いく (くす 
の 冒険 物語 。 も ちろ ん 、 王 女 様 を 助け 
に 行く の で す ! 

テン キー で 、 ゴ ー ス トマ ンション を 
あちこち 動き な が ら 6、 爆 弾 を セッ ト し 
よう (スペ ー ス キー) 爆弾 に ゴー スト 
が 重なっ だ たら 、IGRPH| キ ー を 押せ ば ボ 
か ペン UI コー スト ド ト ほ 、 も うい ちら た お あお 


ある 程度 、 ゴ ー ス ト を や っ つけ て い 
る と 、 カ ギ を 落と し て くれ る こと が あ 
る (と いう より そう で な いと 先 に 進ま 
な い ) カギ が 出 て きだ た ら す か る ず ひ ろ 


4 チョ イッ と リモ コン 爆弾 を 仕 か け て お 
いて 、 ア ホ な ゴー スト を 待ち ぶせ っ !! 


ドッ コーン 。 ちょ っ と あわ れ な 気 も す 
る けれ ど 、 こ れ も す べ て 王女 様 の た め ! 


っ て 、 中 央 の 上 に ある ドア へ 走っ て い 
こう 。 その カギ で 、 上 の 階 へ の ドア が 
開く て はず だ 。 「 

ゴー スト マン ショ ン は 6 階 だ て 。 キ 
ミ は 、 6 階 上 の 屋上 で 泣き きけ ん で い 
る は ず の 土 女 様 を 救え る か !? 


EE RW ER IM SR IM ER 8 SW RS 8 8 5 まき Bm 8 


4 6 
「 BY 
4M し じ て か mm 
き 

W 三 
! 免許 は 持っ て さや と す た 
ゃ Y 1 し 0 い 人 邊 
s な いけ ど 、 バ ちら パ た 3 8 
3 ー ミリ ン パロ 
ョ m イク に 夢中 ./ れ ま コ 免 イ m 
馬 ジ ーー つら か v ン 許 の 「 
ma の の た ジイ 71 TTF が と も に 上 
「 ミュ メ AM 1 の り 結 持 6 | 

に も まま は ツウ つ 
| し 《 だ っ コ し て 
lm し し ん 私 けり な お 上 
ll ン | の らい り 6 
回 uu ms | い 技 れ けい 
WO @) |」 か 術 な れ も lm 
旨い N 、 で ペー/) 生 に リン 

NO | ・ ノ \ 
E と 2 の 更 ^ ズ ラン ご | f 無 の : リ - 
ーー 

2 FN 8 

0 に RS り ー ガ の な ん で 


ト 用量 dE 有朋 3 ま 5 8 8 ま 上 8  』 


4 ム 4 や っ と カギ が 出 て きた 。 は や く ひ ろ い 
に 行か な いと 消え ちゃ うこ と も ある の だ 


と ころ で 、 こ の ゲー ム に は 隠れ キャ 
ラ が ある の だ 。 出 し 方 の ヒン ト は 、 ひ 
だ すら 爆発 1! 

まあ 、 ど うい うわ け か 8001mkII で し 
か 動か な いこ の ゲー ム 。 わ り と こっ を そ 
り 、 自 分 だ け 楽 し ゆる 感じ だ よ 。 


田 プ ロブ ラム の 説明 -。 980-1060  B%.C%.A%Ce) の デー ? B…… 自 分 の アド レス 。KIC2……SICe) の カウ ント 

10- 110 初期 設定 6 マ ・ CCe)…… 敵 の アド レス ・ YO 〇 …… 自 分 の 数 

120- 220 自分 を 動 ひ す (バフ ダン 、, 。 1070-1250 マシン 語 デ ー マ 。 三 … 面 デー タ の 数 ・Z…- 何 匹 殺 す と カギ が 出る か 
か ぎの 剖 定 ) ・1260 一 1320 STAGE デ ー マ ・F.G.H.J…… ド レン ガ の 座標 。 ツー… ク の カウ ント 

230- 350 敵 を 動 び ず (330 一 340  ・1340-1470 初期 設定 (次 の 画面 へ 移 ・ X.Y…… 自 分 の 座標 。S2…… バ パフ ダン が ガ で て いる か (フラ グ ) 
自分 が や られ だ 判定 ) 。 < る と き ) 。TXCe).TYC2)…… 敵 の 座標 ・ W…… バ フ ダ ン を 出す (フラ グ ) 

360 一 400 爆発 時 の 判断 及び 処理 * 1480-1500 卵 を 置 ご 位置 決定 サブ ル * XI.YI…… 自 分 の 増分 。 TLT2…… 了 開 レキ ヤラ に 関す る 変数 
( 逆 を や つつ けた か ) < ー チ ン ・x2.Y2… 敵 の 増便 ・ 画 チェ エン ッ フ ポイ ント 

410-- 440 面 フ リア 時 の 処理 。1510-1570 自分 が び やら れ だ と き の 処 。S…… カ ギ が で て いる か (フラグ ) 。 デー タ ガ が 多い の で 気 を つけ て 入力 し て 

450- 550 エピローグ ブ 2 理 ・KX.KY…… カ ギ の 座標 ・ こ ださい 。 特に 1080 行 1250 行 は マシ ン 

560- 630 初期 設定 (キャラ デ ー マ , 。 遼 変 数 リス ト 。ST…… ス テー ジ カ ウ ント ・ 語 の デー ツタ な の で まず 、SAVE を 忘れ 
読み こみ 、 マ シン 語 設 定 ) * A%Ce)……: キ ャ ラク フタ ・SICe の …… 卵 ひど うか 〈 フ ラグ) ・ ざ に 。 (ヒロ ) 


ん パ <HELP PRINCESS〉 バフ ダン を し ガ け て 、 相 手 を や つつ け 、 か ぎ を 1 つと つ だ ら 、 屋 上 へ 行け る 。 6 面 フ リア する こ 、 


お 姫 さ ま が び や つ て き て HAPPY END。 ゆみ は ワー プ し て HAPPY END を 見 まし た を 。 つ まり いん ち き で す 。 ' 


1 "X%% | HELP PRINCESS 」 1985 年 2 月 25 日 
by FUJISAN SOFT 

29 WIDTH 49.25:CONSOLE 9.25.9,1:CLEAR309 

・&HCFFF 

39 CMD SCREEN 2.9.7:CMD CLS 3:DEFINT A-Z/ 

49 DIM A%(320 ) ,F(20) ,G(20) ,H(20 ) ,J(20 ) 

S9 WIDTH4W 

69 DEFUSR=&HD999:DEFUSR1 =&HD969:DEFUSR2= 

&HD9C9:DEFUSR3=&HD1 2 

79 OUT81.9:GOSUB 5S579 

89 CMD CLS3EOUT81.9:YO=3:ST=1 

99 V=9:READ E:FORI=1TOE:READF( 1) 。G( 1 ) 、H( 

1).J(I):NEXTIEREAD ZTT1.T2 

199 X=144:Y=16:S1(9)=9:S1(1)=9:52= の 

119 GOSUB 1340 

12 り ' 証 還 証 証 識 YO 還 証 間 較 

139 I=INP(9):Il=INP(1):IFS2=9ANDINP(9)=1 

91THENW=1:FORP=9TO19:BEEPPMOD2: NEXTP 

149 X1=((I=191)%(STATUSPOINT(X+27。Y+1 )=0 

)-(1=239)%X(STATUSPOINT(XX-6.Y+1)=9))※16 

159 Yl=9:IFX1=9THENY1=((1=251)%(STATUSPO 

INT(X+19、Y+17)=9)-(Il1=254)x(STATUSPOINT ( 

X+19,Y-15)= の 9))x16 

169 D=D+1:IFD=2THEND=@ 

179 U=USR3(B) 

189 IFSTATUSPOINT(X+X1。Y+Y1+15)=11THENEOR 

P=2T03:FORT=1TO69:BEEPIMODP ENEXT1 PSC!= 

っ SC!+20999:Tl=D 

199 IFS=1THENIPX+X1=KXANDY+Y1=KY THENFOR 

1=1T029:BEEPIMOD2ENEXTECMD LINE(144.9)-( 

1 99。 15) 0。BESS ョ =W 

290 XX=X+X1:Y=Y+YI:B=&H8099+X/4+Y※89: 1FD= 

9THENU=USR(B) ELSEU=USR1 (B) 

219 IFX=144ANDY=9THEN410 

229 IFW=1THENIFX1 く >90RY1 く >9THENBX=X-X1:B 

Y=Y-YIECMD PUTQ(BX、BY)、A%(240):S2=1:W=0 

230 還 還 間 了 間 テ † 男 還 症 開 

249 FORL=9TO1 

250 IFS1(L)=9THENK1(L)=K1(L)+1:TIFK1(L)=( 

L+1)X19THENK1(L)=9:S1(L)=1:FOR1=1TO10:BE 

EPIMOD2ENEXTEX2=9:Y2=9:GOTO 319 ELSE359 

269 IFL=9THEN X2=((X>TX(L) )x(STATUSPOINT 

(TX(L)+27 。TY(L ) ) = )-(XX く TX(L) ) x(STATUSPO1 

MIt TA 人 (L し リー6。、TY【L)) ミ 0))%16 

279 Y2=9:1IFX2=9THENY2=((Y>TY(L) )*(STATUS 

POINT(TX(L)+10.TY(L)+16)=)-(Y く <TY(L) )x(S 

TATUSPOINT(TX(L)+19.TY(L)-16)=9) ) x16 

289 IFL=ITHENX2=9:TIFY2=9THEN X2=((X>TX(L 

))X(STATUSPOINT(TX(L)+27 。TY(L) )=9 ) -(X く TX 

(L))%(STATUSPOINT(TX(L)-6,.TY(L.) ) =9) )x16 

299 U=USR3(C(L)): IFT(L)=1THENCMD PUT@O(TX 

(L),TY(L))、A%(240):T(L)=9 

399 IFSTATUSPOINT(TX(L)+X2+14.TY(L.)+Y2+1 

) =3THENT (L) =1 

319 TX(L)=TX(L)+X2ETY(L)=TY(L)+Y2:C(L)=& 

H8999+TX(L)/4+TY(L)x89:U=USR2(C(L) ) 

329 IFS2=1ANDINP(8)=239THENS2=9:CMD LINE 

(BX。BY)-(BX+15.BY+15).9.BF:CMD PUT@(BX,B 

Y)、A%(289):FOR1=1TO198:BEEPIMOD3: NEXT ECM 

D PUT(BX,BY) 、A%(289) :GOSUB 369:GOTO 359 

339 IFTX(L)=XTHENIFTY(L)=Y+160RTY(L)=Y-1 

6THEN1520 

349 IFTY(L)=YTHENIFTX(L)=X+160RTX(1)=X-] 

6THEN1520 

359 NEXTL:GOTO 136 

369 FORL=9TO1:IFTX(L)=BXANDTY(L)=BYTHEN3 

9 

379 NEXTL:IF BX=T1ANDBY=T2THENCMD PUT@(B 

X, BY ) , AX( 129 ) 

369 RETURN 

399 SC!=SCI+590:S1(L)=9:1=L:GOSUB1489:V= 

V+1:IFV>=ZTHENCMD PUTQ(BX,、BY ) 、A%( 49 ) : KX= 

BX:KY=BY:S=1 

499 GOTO 249 


本 ジッ 
更 人 1 


419 FORI=2T04:FORP=9TO96:BEEPPMODT: NEXTP 
】 | 

429 CMD CLS3:WIDTH469 

439 FORI=1TO199:LOCATE19.19:PRINT_ USING" 


BONUS・・・ 壮 半 人 " 1 LTxSTxX199:BEEP1 : BEEP9 : NECX 
T:SC!=SCI+19999XST:YO=YO+ 1 

449 ST=ST+1:IEFST く >7THIEN90 

450 ' 還 還 症 本 較 し" け - ノ ツ ` 回 是 是 症 開 

469 WIDTH49:FEORI=9TO394STEP16:CMD PUT@(I 
。144)、A%:NEXT 

479 U=USR(-22512) 

489 COLOR5:LOCATE4、19:PRINT “" ャ セッ タ GHOST _M 
ANSION ノ オク ショ ウタ 17" 

499 FORI=1TO59099:NEXTI 

599 COLOR3:LOCATE13.12EiPRINT "リヒ メー 11『 

519 FORI=256TO88STEP-8:CMD PUT@(1.128) .A 
%(209):BEEP1 : BEEP0 

529 FORP=1TO59:NEXTPECMD LINE(T、128)-(|1+ 
15.143) 0、BP:NEXTI 

539 CMD PUTQ(89,128).A%(200) 

549 FORI=15TO9STEP-1:COLOR2 ELOCATE9. 1 :PR 
INT "@ "FORP=1TO0199:NEXTPELOCATE9.1:PRIN 
SNEX よ 1 

559 LOCATE19,15:COLOR7:PRINT "人 HAPPY EN 
D 草 " END 

550 ' 還 還 隊 間 昌 シコ † 語 証 還 間 開 

579 FOR I=9 TO 9:READ B%(I):NEXT:FORI =9T 
08STEP8 :FORP=9TO8STEP8 :CMD PUT@(T,P) 、B%: 
NEXTP,I:CMD GETQ(9.9)-(15.15),A%IiCMD CLS 


3 

589 FOR 1=9 TO 9:READ C%(I):NEXTECMD PUT 

@(4.8)、C%:CMD GETQ(9.9)-(15,15).A%(49):C 

MD CLS3d 

599 FOR 1I=9 TO 299 STEP40:FORP=9T033: REA 

DA%(I+P+89):NEXTP、1 

699 FOR I=&HD999 TO &HD9C9 STEP &H69:RES 

TORE 1989:FOR P=9 TO 31:READA も IPOKET+P,V 
AL("&H"+A$) :NEXTP 。 1 

619 FOR I=&HD129 TO &HD13F:READA も :POKE1 , 
VAL("&H"+A$) :NEXT 1 

629 FOR 1=&HD929 TO &HD9E9 STEP &H69:FOR 
P=9 TO 63:READA$:POKEI+P、VALC"&H"+A$ も ):N 

EXTP,! 

639 POKE&HD967,8H89:POKE&HD968,&HD9:POKE 

&HD9C7 、&HE9 :POKE&HD9C8 , &HD 

649 ' 還 題 証 本 昌 パロ ロー ク " 還 還 還 間 

659 WIDTH49:COLOR4 

669 PRINT "回 回 還 昌 嘆 遼 ” 還 是 較 

679 PRINT " 加 還 洋間 是 間 ” 回 m 抽 

689 PRINT "回 回 還 暗 較 是 詳 較 

699 PRINT:COLOR 2 


799 PRINT" EN 衝 RNN RSSEB 軸 各 訂 2965R 

人 

719 PRINT" 回 回 間 回 還 回 還 間 回 回 

画 

729 PRINT" 人 

739 PRINT" | . 詳 是 問 。 | 回 | 関 是 4 
| 

749 PRINT" | 。 症 較 RS 

2 


759 FORI=9TO0394STEP16:CMD PUTQ(I、144).AX 
・NEXT 

769 CMD PUTQ(249.128) JA%(169):B=-22598:U 
=USR(B):CMD PUT@Q(144.128) ,A%(240) 

779 FORI=1T01999:NEXTI:FORI=1TO19:BEEPFIM 
0D2:NEXTI:C=-22468:U= じ SR2(C) 

789 FORI=9TO096STEP8:C=&H8999+(249-)/4+1 
9249:U=USR2(C) 

799 D=D+1:IFD=2THEND=9 

899 IFD=9THENU=USR( B ) ELSEU=USR1 (B ) 

819 FORP=1TO399:NEXT 

829 U=USR3(C) :NEXT TI 

839 FORI=1TO39: BEEPIMOD3: NEXT 


〈《⑰ み ちゃ ん トマ ト 〉 よる すい えい する よ ( 夜 、 水 泳 す る よ ) (岐阜 県 ・ 岡 田 保 紀 フン ) 交 こ れ は ま と ま つ て いる ネ 。 お じ よ 
ー ず で す な あ 。 も うち と 長い の を 待つ て る ぜ 。3 カ ラグ ラム 。 婦 


ピル / 


※/O0g-Og@ 


へ 
ー 2 
テス ハー 


(4 
いう 


Or 


849 U=USR3(C):CMD PUTQ(144、128).A%(280 ) 
859 FORI=1TO199:BEEPIMOD2: NEXT 

869 U=USR3(C) 

8670 CMD CLS2ELINE(9.29)-(38.20)。"「:B=-25 
989:C じ =-22520:U=USR(B):U=USR2(C) 

889 CMD PUTQO(32.169),A%(49) 

899 FORI=9TO2:CMD PUTQ(176.1X32+96) 、A%(8 
9+IX89):NEXTI 


999 COLOR7ZELOCATE6、13:PRINT "・・・ YOU 
919 COLOR7Z:LOCATE6.17:PRINT "・ GHOST KNI 
GHT " 

929 COLOR7ELOCATE6.21:PRKINT "・・・ KEY“ 
939 COLOR7:LOCATE24.13:PRINT "・・・ DOOR" 
949 COLOR7:LOCATE24.17:PRINT "・・・ GHOST 
EGG" 

959 COLOR7:LOCATE24、21:PRINT "・・・ BOMB" 


969 FORI=1TO199:FORP=1T07 :COLORP : LOCATE1 
2,23:PRINT "HIT ANY KEY !":EIFINKEY$ く >" 
THENRETURN 

979 NEXTP,I:CMD CLS2:LINE(6、13)-(38、23) , 
" "。BF:GOTO 759 

989 ' 還 還 還 本 本 PU] テ `-? 還 還 還 還 較 

999 DATA 16,.8.29821 、29821 ,29821,9.21841 . 
21841,21841,9 “ 

1999 DATA 16.8,-32758.-32736 ,-32649、2178 
,-21848,19249.2948.512 

1919 DATA 32,16.21761、16469.21765.29565。 
21781 .21589。21845,21845,-1。-1。-21846,-21 
846.21845、21845,21845,-169,21845、855.218 
45、-12457、21845,-21939。21845。21845,-1,-1 
,-21846。-21846,21845、21845,21845,21845 
1929 DATA 32,16,.256.29489.3,25699.16,256 
32、12489,26889,9,26883.29998.27972,-1739 
3.26992,-3277、25849、-18641.25788.-4105,2 
735、21845.85,-21919,.169、-21919.169、-219 
19,169,-21919,169.21845.85 

1939 DATA 32.16.9、9.9,-24534,.512.-5954,1 
1998,-21766,-29734,-21846,-22996.-21846, 
-21974,-21846,-27359,-21926,-25942、-2243 
8 は 。=25942 、-22498。=27222、=22438 27222、=24 
496。-27359,-24496。-21974。-32598、-22006 1 
79,-22916,166 

1949 DATA 32、16,.21765.89,-21974,168,2178 
1.84、-2793.84,-764、-4912,-241,-32682,-24 
3,-32678。-253。196,-22016.168。-22916,169, 
19752.169,2569.169,2560,179,19752,-24496 
,19752、-22358,19752,-21846 

1959 DATA 32.16.9,9,-1,-769,-65,-1793,-1 
。 こ 5889.=69。=22273。21998。=22442、92699。 2 
2442。32759。-22442.21947。 こ 22442 21742。=22 
458,21691,-22458.21998,-22442.8891,-2249 
4,-39484.-22392.8882.19274,-39529,-30584 
1969 DATA 32。16.3972.192。12.12288.8192,1 
49,2397.8192,16584,786,12546,44.18688,12 
352,.5426,-32676,-19752.85,21772.13168,92 
18,99.448,19472,-16376,35.8752,8192,-163 
89,-15699,3984,48 

1979 ' 還 還 還 議 田 キヤ フ ウツ シ ルー チン 回 還 間 還 較 

1989 DATA 5F,23.56,EB,D3.5C、11 .29.D9,96, 
19,9E,94,1A,77,23 

1999 DATA 13,9D,29、F9,.D5,11,4C、99.19,D1 , 
19,EF,D3,5F,C9,99 

] 190 「' 還 還 較 較 議 キャ ラフ リ シ ルー ナン 回 証 還 還 還 

1119 DATA 5E,23,56 ,EB,D3,5C,96 ,19,9E,94, 
36,.99,23,13,9D,20 

1129 DATA F9.D5,11.4C,99.19.D1.19,EF,D3, 
5F,C9,99,99.99*090 

1139 ' 還 較 還 還 較 キャ フ M テ `- ツ > 回 還 還 還 較 

1149 DATA 99,55,55,99,91,77.5D,49,91,.55, 
55,49.91,FD,7F,49 

1159 DATA 91.F3,CF,49,91,F3.CF,49、99,FF, 
FF,9F,9A,BF,FE,AF 

1169 DATA FA,AA,AA.A9,F9,2A.A8.99、99,FA, 
A8,99,99,FF,FC,99 

1179 DATA 15,59.3C,99.55,59,9F,99,99,99, 
95,54.99,99,95,55 


1189 DATA 99.55.55.99.91.75,DD,49.91,.55, 
SS5。49.91 ,FD,7F,49 

1199 DATA 91、F3,CF,49.99.F3.CF.99.F9、FF 。 
FF,99,FA,BF,FE,A0 

1299 DATA 9AJAAJAAJAF,99.2A.A8.9F,90,2A。 
AF,99,99,3F,FF,99 

1219 DATA 99.3C、95.54.99.F9.95.55.15,.59 、 
99.99,55,59 ,99.99 

1229 DATA C9,.3D,D4.99.C9 DS,、55.99。C1.55, 
SS5,49。C1 55,55,49 

1239 DATA C1.F9、9F、48.C1.55,55,4A,C1,.55。 
S5,4A,C1.D5,55 4A 

1249 DATA 55.55.55.5A.95,DS5 .55.5A,81 DS 、 
SS5。4A.91、D5,55,4A 

1259 DATA 91.75.55、48.99.55.55,.49.99.15。 
9 の 9 6155 55 

1260 ' 還 是 雇 証 護 〇 IAGE テ "ー タ 還 証 証 隊 呈 

1279 DATA 9.2.2.2.6.2.8.8.9。4.2.6,3.4。5, 


9.6.6.2.9.4.11.2.17。3.10.5.13.9.15.5.17, 
6.15.8.17.9.5.16.112 
1289 DATA 14.2.2.2.9、4.2.7.6,7、7。7.9.4.8 
9ySy9y6.9.9。2。12.5。、9.7 42.9、19.6.)1.6 
sy14.2.17.2.14.3.14.6、15.5.17.6.17.7。.17.9 
まま 。8 上 4.9.19.9、16 9、7 26.160 
1299 DATA11、2.3.2.9,3,2。5,2.6.3.6,9、4,6.。 
oO46、6。2.8.9.11.2.11.9.9.6、10、6.13,4、13,8 
14.2.16.2.17.3。17、8,14.9。16.9.9.249.809 
1399 DATA 1.5.3,.14.8.12.288。16 
1319 DATA 11. 1.2.9.2.1.4、3.5.5。4.14.5,11 
es まま 3193.2.10.2.160.9.10.5、) 7/ 9 72 6。 
4. 946.9./,10.9、8.9.9、11./,18.9.15,16,128 
1329 DATA 19、2.2.4.5.4.6.4.19。1 7.2.9.6.。 
1.8.3.6.5.8.19.19、1.14.1.15.1.18.4.19.3, 
13.19.14.6.17。7。15.9。18.19.29,224,160 


1330 ' 証 症 症 是 間 ショ キ 2 還 間 間 間 間 

1349 CMD CLS3:COLOR2EWIDTH49:LOCATE19,.8: 
PRINT "STAGE [72ST に ) 1 

1359 COLOR6:LOCATE19.19:PRINT "SCORE [" 
まる 2 な 

1369 COLOR1:LOCATEI9、12:PRINT "YOU に 
US の 

1379 FORI=1TO04999:NEXT:OUT81.9 

1389 CMD CLS3:FORI=9TO176STEP176:FORP=0T 
0394STEP16:CMD PUTQ(P、1) JA%ENEXTP、1 
1399 FORI=9TO394STEP394:FORP=16T0169STEP 
16:CMD PUTQ(IJP).A%ENEXTP。1 

1499 IFE=9THEN1 420 

1419 FORI=1TOE:FORQ=F(1)TOHCUI):FORP=G( 1T) 
TOJ(I):CMD PUTQ(QX16.Px16)、A%:NEXTP。Q、1 
1429 Il=9:GOSUB1489:1=1:GOSUB1489 

1439 CMD LINE(144.9)-(159.15).9.BF:CMD F 
UT@(144、9),A%(89) 

1449 B=&H8909+X/4+Yx89: じ =USR(B) 

1459 FORI=9TO1:C(1)=&H8999+TX(T)/4+TY(I) 
89:NEXT 1 

1469 FORI=1T099:BEEPIMOD3:NEXT:FORI=11T07 
S・BEEPIMOD5:NEXTIEFORI=E1TO24:BEEPIMOD2 EN 
EXT:FORI=1TO209:BEEPIMOD4 : NEXT 

1470 RETURN 

1489 TX(I)=INT(RND(1)X18+1)x16:TY(T)=INT 
(RND(1)%X8+3)x16 

1499 IFSTATUSPOINT(TX(L)+T11、TY(1)) く >9THE 
N1480 

1599 CMD PUT@Q(TX(1)、TY(1)) JA%(169):T(I)= 
9:RETURN 

1519 ' 還 較 題 病 "フレ ツー 還 是 症 症 還 

1529 FORI=1T099:BEEPIMOD3:NEXT:U=USRS(B ) 
:CMD PUTQ(XJY),A%(289):BEEP1 : BEEPW 

1539 YO=YO-1:IFYO く >29THEN 100 

1549 CMD CLS3:FORI=E1TO350:BEEPTIMOD7 ENEXT 
IE:WIDTH49 

1559 COLORS:LOCATE19.19:PRINT "キミ 八 ビ メ フ 
タス ケラ レナ カッ タ 。 " 

1569 COLOR3:LOCATE19、13:PRINT "1 GAME 
OVER ll 

1579 FORI=1TO03999:NEXT:CMD CLS3: RUN 


キビ を 気に入る 人 が いま すか ……。 へ ん て こ だ け ど ご 思わ ず 2 カラ グラ ム 。 立 


g ジ テッ ビ アン 〈⑩ み ちゃ ん トマ ト 〉 わる い に き びき に いる わ (悪い ニキ ビ 気 に 入る わ ! ) (岐阜 県 ・ 岡 田 保 紀 フン ) 交 ど この 世界 に 悪性 


昌 品 


詩 差込み タイプ イム 5 ググ 


せま り の ぐる 石 を よ け 


9 ぐ つつ 壁 の 色 を 変え る 


4 彰 が キミ 。 左右 の 石 の 群 が キ ミ の ほう へ に じ り よ っ て くる ぞ 。 


較 プ ログ ラム の 説明 。14 
1 ング 初期 設定 15 一 17 
SE っ 初期 画面 ( 外 ワ ング ) 。18 
6 / キー 入力 判定 ・ 自 分 の 秘 動 ・19 
8 敵 の 秘 動 s 20--21 
9 時 間 等 表示 。22--23 
10 一 11 面 ク リア 判定 * 24 一 29 
12-13 ^ 日 " つ ^ 還 "に 変え る 30 


1 CLEAR399 .&HCFF9 :CONSOLE9.25.9、1:DEFTNT 
A-Z:DIMZ(1、17):COLOR7:GOTO19 

2 FORA=9TO17:Z(9、A)=3:Z(1.A)=23:NEXT:POK 
E &HD94A.13:POKE &HD949.12:RESTORE39 

3 COLOR6:PRINTCHR も (12):LINE(9.9)-(39、 ご 4) 
、" 較 "2、BELINE(3.3)-(23.21)."@"、6.B:P=9 

4 LINE(2.3)-(24、21) "日 "、2.B:FORA=4 TO22S 
TEP3: READB$:LOCATE26.A:PRINT B$::NEXT 

5 LOCATE 28.8:PRINT USING" 杜 村 拓 9" ト HiS ELOC 
ATE 34.16:PRINT M・::COLOR 3:LOCATE 28、19: 
PRINT USING"& 8 "KSTRING も (N, "の りう) に STR も (N 
)・:RESTORE 22:GOSUB 18 

6 FOR T=699 TO 1STEP-1:BEEP1:U=USR(9):BE 
EP9 : X=PEEK(&HD94A):Y=PEEK( &HD949 ) 

7 LOCATE X、Y:PRINT" り "に ECOLOR 6:IF P=4THE 
N 19ELSE IFX=20RX=240RY=3ORY=21THEN1 2 

8 FOR A=9 TO1:W=Z(A、Y-4):POKE 8&HD94B, WEL 
OCATE W、Y:PRINT" "ii:U=EUSR1(0):Z(A,Y-4)=P 
EEK(&HD94B):1F X=Z(A,Y-4)THEN 14 ELSE LO 
CATEZ(A、Y-4) 、Y:PRINT "@ "に ENEXT 

9 LOCATE 28.11:PRINT USING" 村 拉 壮 拓 り "1S・: し 0 
CATE 34.13:PRINT USING" 拉 # 手 "TK:LOCATE X。 
YiPRINT" "ECOLOR 3:NEXTT:GOTO 14 

19 LOCATE 13.12:PRINT "PP" に ETIF X=13ANDY= 1 
2THENM=M+ 1:N=4:S=S+2XM+INT(T/19) :EILLSES8 
11 LOCATE9 .24:FORA=9TO24:PRINT :BEEP1: BE 
EP9 : NEXT : BEEP: BEEP:GOTO 2 

12 IFX=2THENLINE(2,3)-(2.21) 、" 較 "、2:X=3EL 
SEIFX=24THENLINE(24.3)-(24.21) 、" 叶 "2:X=2 
3ELSEIFY=3THENLINE(2.3)-(24.3) 。" 還 "2:Y=4 
ELSELINE(2.21)-(24.21) 、" 語 " 2:Y=20 


も し か し だ た だら 、 ポ シェット No2 の 
1 『 ぺ ぶっ ちゃ ん こ 』 が ヒン ト に な っ た 
の か な 7 て も 、 だ ん に し て も 、 こ 選 
っ て な か な か ユニ ー ク で 新鮮 な ゲー ム 
な の が だ 。 

テン キー で 夫 を 動 
が し て 、 ま あおり の 末 
(日 ) を 全部 軒 に 変 
ぇ える の が 第 1 の 目的 
と いっ て も 、 壁 は ど 
こ か 1 ヵ所 に る わる 
と その プ ブロッ ク の あ 
る 面 は 全部 変わ っ て 
まつ の の で ラン チッ ン 。 
で 、 全 部 の 壁 が 時 に 
な っ た ら 中 央 に P が 


・GET 朋 ・GE TARA・ 
・H 1GH・SCORE・ 
2989 
・YOUR・SCORE・ 

429 
・T1ME・ 537 
・ROUND・ 3 

移 琶 移 芝 


・b り ・T 介 KO ひ ・ 


し WI WNW HI 8 8 8 8 WW 8 WW 8 g 8 和 】 


BY 人 ム kAO と うい 


M、。、 


緑 の 速達 が オレ の 机 の 上 に 乗っ た ・ オ レ 
は 日 記帳 の 連続 空白 記録 に " .” を 打てる 
と 思い その 封筒 に 飛び つい た ・ 封筒 に は 
遠い 苦 に 聞い た こと の ある 言葉 が 書い て 
あっ た ・ ど う や ら オ レ の 使命 は (つづ く )。 


【 月 月 有朋 月 』 月 有朋 旧 上 っ 


遇 で 。 
10 面 あっ て 、 楽 し い 。 
し か も 、 
も 選べ る 。 初 期 画面 て 、 
の か わり に な に か ヵ か 数 字 の キー を 押す と 
を の 面 か ら は じ ま る の だ 。 実 は 11 面 も 
デー タ と し て は 存在 し て いる の だ が 、 
絶対 クリ ア で き な い る 嫌 J の 面 な の だ 。 


自分 や つつ けら れ だ 処理 。31-32 タイ トル デー タ BI 

ゲー ム OVer 処 理 ミ 画 変 数 リス ト し いい 2 自分 の 数 

面 (内 部 ) 表示 。 XY ヤ …… 自 分 の 場所 。 * ち な み に 、 

マシ ン 語 わり 当て ・ 選 …… テ キ の 場所 * D04A.D049H-…… 自 分 の x と y 卒 標 
タイ トル 表示 ・ 日 …… 最 高 点 ・ D04B.D049H…… 敵 の x と v 卒 標 
画面 デー タ 。 ら …… 点 。 と な つて いま ざす 。 な お 、2429 行 の デー 
マシ ン 語 デー タ 。PーーPOINT 数 (SPOINT で 面 リ ア ) ・ は マシ ン 語 で す の で 打ち こみ お わ つ だ 
画面 表示 デー タ > M…… 画 ・ ら 竜 の ため SAVE し まし よう 。 (ヒロ ) 


13 BEEP:OUT81.33:S=S+2xM:P=P+ 1:POKE&HD9 4 
A、X:POKE&HD949、Y:OUT81、32:GOTO 8 

14 NsN-1:IFN く THENFORA=9T099:OUT81 、33: BE 
EP1:OUT81.32:BEEP9 : NEXTELSEOUT81 .33: BEEP 
:OUT81、32:GOTO2 

15 PRINTCHR も (12):FORA=9TO3:COLOR1 ELOCATE 
2.A+2:PRINT B$(A)::COLOR2 ELOCATE2 A+7:PR 
INT C$(A)i:NEXT 

16 COLOR5:LOCATE134.12:PRINT "SCORE "KSX19: 

LOCATE11.14:IFH<STHENH=S:PRINT"YOU GOT A 
HI-SCOREI "ELSEPRINT "HI .SCORE":Hx10 

17 LOCATE12.29:PRINT"Hit [RET] key":M=VA 

し (INPUT も (1)):M=M-(M=9):S=9:N=4:GOTO 2 

18 FOR E=1TO M MOD11:READ E$:NEXT:FORA = 
9@TO INT(LEN(E$)/4)-1:FOR B=1TO4:P(B)=VAL 
("&H"+MID$S(E$、Ax44B.1) )+5:NEXT:LINE(P(1) 
・P(2))-(P(3).P(4))" 較 "、2ENEXT:RETURN 

19 OUT 81.9:RESTORE 24:FORA=&HD999 TO&HD 
9A9:READ B$:POKEA、VAL("&H"+B$):NEXT:DEFU 

SR2=&HD97A:U$S=USR2(""):DEFUSR1=&HD94E: DE 

FUSR=&HD り 99:M=1:S=9:N=4:H=209:BEEP 

29 PRINTCHR$(12):COLOR1 :RESTORE31:FORI=@ 

TO03: READB$( 1 ) 、C$ も (1) :FORA=1T037 :LOCATE39- 

AI+11:PRINT LEFT も (BS(I).A)iENEXTA、I:LOC 

ATE9,25:PRINT:PRINT:COLOR5 

21 LOCATE13.14:PRINT " PC 8991 
14.16:COLOR7:PRINT 


"ELOCATE 
"by TAKAO "・:GOTO17 


* 


22 DATA 121cCfcCf2277797e7.999e.1915171ele 
7e9efefef9f7f9f9997919.191df9fd,8888 

23 DATA 1272727cC7ClcCf292929C9cfC、999a906 
969666606f595959f9fff.22e22CeC。1949191e1l 
eaefffe,717d919d.7778788888878777.09 

24 DATA 2A,49.D9.24.2C、DB,9.CB、57 .29 、7 .2 
C,CD, 3F ,D9 . 29 , 1 .2D,DB,9,CB,67 。20,7 。25 

25 DATA CD,3F.D9.29.1.24.DB.9、CB,77.20,7 
。24.CD,3F.D9.29.1、25.DB,1.CB、47.29,7 

26 DATA 2D、CD,3F,D9 .29.1.2C、25.2D,22。49、 
D.C9.E5,CD,F3.3.7E,E1,FE,87.C9.9.C.D 

27 DATA 3.9.9、2A.49.D9,24.2C.3A、4B,D9 , 4F 
。・7C,61.24.BC,38.9.24.CD,3F .D9 .20 1 ,25 

28 DATA 18.E、3A、4A、D9.3C,BC、28.9.25.CD,3 
F,D9,29.1.24.25.7C,32.4B、D9、C9.1.19.28 
29 DATA CD,3A.9、CD.5A.4.21.8.A、CD,A9,.3,.2 
1.99.D9.CD,ED,52.C9.59.43.38,.39,39,.31 .20 
>47.45.54.41.29.47,45.54.41.9 

39 DATA・GETA・GETA・,・HIGH・SCORE・.・YOUR・SC 
ORE・,・TIME・.・ROUND・, 、・by・TAKAO・ 


〈GETA・GETA〉 これ は と 一 つて も 難し いん と ちゃ うつ や 上 下 の 壁 に は タッ チ で きる けど 左右 が ね ……。 結局 あ だ い は 1 
面 も フリ アジ で き ざ ず に 原稿 を 書い て し も うだ ……。 


ンク 


『/ 


1 面 クリ ア 。 変 化 に 富ん だ 面 が 


こと も あろ うに ちゃ ん と 面 
ナグ ーッ 二 m 


\※OOg-Og@ 


》 長者 が 集 ま つて 優雅 に 楽 
じ お に ラシン フグ ゲー バ だ ば 
この グー は 、 7 だ ら ペ そつ くり だ と 、 


ちょ っ と ルー ル が 変わ っ て いて 、 別 名 「 長 者 
様 遊 び 」 と も 「 フ ァ ン タン 」 と も いう ん だ を 


2 


① ポ イン ト を あら そう ゲー ム で ある こと (1 
回 ご と の 勝敗 は を それ ほど 問題 で は な い )。 


この 笑い 方 は 
カメ ラ の オ サ 
ム に そっ くり 


ある 。 
基本 的 な ルー ル は 同じ だ けれ ど 、 


ン 


4ACOM 側 の 3 人 は 勝つ と ニヤ ッ と 笑う の 
だ 。 な ん と な く 見 た こと の ある 笑顔 。 


19  @e@e@@ INITIALIZATION @e@@@ 

29 CONSOLE , , 9 :GOSUB 679 

39 STOP ON:ON STOP GOSUB 979:CONSOLE 9,2 
S:CLS:WIDTH 89.25:CONSOLE 20.5,9,1 

49 DEFINT _A-Z:RANDOMIZE VAL(RIGHT$ も (TIME$ 
>2)+MID も (TIME$,4.2) ) 

S9 DIM NM$ も (13) 、ST も (4 ),SF(52) ,CT(13) ,PH( 1 
3 ) ,T$ も (4) 、PT(4) ,NH( 4 ) 

69 FOR L=1 TO 4:READ ST$(L):NEXT:DATA 人 る, 
KK) 

79 FOR L=1 TO 13:READ NM や (L):NEXT:DATA A 
つっ 3。4。5.6,7,8.9,19,J,Q,K 

89 FOR L=1 TO 4:READ T$( し ):PT(L)=29:NEXT 
DAHA ケー ペー! 、 すす デーー 

99 FOR L=1 TO 13:READ CT(L):NEXT :TN=1:DA 
TA 1.13,2.12.3。11.4.19.5.9.6,8,7 


〈 く あん だ ん 〉 ご 


E に 似 て いる 


志 閥 ちち 処 み タ アプ イム 3⑳ 分 


② ア パス は 何 回 し て も よい 。 


一 芝 に は 、 テ 


ボリ の HID 


ーー o@ = 


ーー FOR PC? 


人 


計上 正 も で き な い の で 用 心 し よ う ね 。 


22 歳 だ けど 、 
新入 生 で す 。 
最近 大 学 を 
や め ま し た 。 


180cm、83kg の 大 男 
で す 。 東工 大 に 3 
年 間 い た けれ ど 、 


pn 
し 
4 


で す 。 初 投稿 が 採用 され る と いう の で 、 
少々 うか れ 気 味 の 今 日 この ご ろ で す 。 


上 8 上 上 見 時 見 軒 胃 5 計 計時 上 8 四 


199 '@@@@@ SHUFFLING & DEALING CARDS @@ 
交 信 

119 DIM CD(4.13).HD(4。4.13):FOR 上 上 =1 
2:SF(L)=LENEXT:PZ=9 

129 FOR し =1 TO 59:SWAP SF(INT(RND( 1 )x52+ 
1)),SF(INT(RND( 1 ) *52+1 ) ) : NEXT 

139 FOR L=1 TO 52:HD((L-1) MOD 4+1,(SF(L 
)-1)\13+1,.(SF(L)-1) MOD 13+1 )=1ENEXT 

149 FOR L=1 TO 4:NH(L)=13ENEXT:F=9:FOR L 
0=1 TO 4:FOR L=1 TO 13 

159 IF HD(4.LO,L)=1 THEN F=F+1 
1090+L 

169 NEXT:NEXT:COLOR 7:GOSUB 719:GOSUB 64 
9:GOSUB 929 

1 7 回 還 還 間 間 間 間 是 呈 
ED 


0 の 


・PH(F ) =L し (0※ 


MAIN  ROUTINE NE な 


落ち こぼれ て 、 今年 専門 学校 に 入学 し ま 
し た 。 大 漂 飲 み で 、 大 食らい 、 恐 いも の 
知ら ず の 無頼 湊 で す 。 長 い 頭 と 細く て た 
れ て る 目 と 厚い 記 と 脂 っ ぽ い 肌 の 持ち 主 


)ー ス 人 


一 変数 リス ト 

TN ee 手 番 

CDO)…… 場 の 状態 
HD(C.)…… 各 プレ イヤ ー の 手札 
SF )…… シ ャ ッ フ ル (カー ド を 切る ) 
PH( )…… 手 私 の 表示 

CT( )…… コ ンピュータ の 作戦 
り D…… 出 せる どう か の 判断 
Ao 還 ほ カー ビ の マー デジ 
B…… 出 す カ ー ド の 数 

PT( ) 


ポイ ント (を の 回 の 勝者 が 取る )。 TS( 
、 GE( )…: 順 位 
③ い じ わ る パス は で き な い 。 一 プロ プラ ハム の 説明 
持ち 点 20 点 で スタ ー ト し 、 だ れ か ひと り が 20 て 90 初期 設定 、 デ ー タ 読込 
時 110 一 120 "カード ビ を 切る 
50 点 に な っ だ と ころ で ゲー ム 終 了 。 す で お わ 130 こ 160 カード を 配る 
上 ee 200 一 260 プレイヤー の 手 番 
る こと も ある し 、 な か な か お わら な いこ と も 25.3o コン ビュ ー タ の 番 
330 一 360 場 に 出 た カー ド 表 示 
ここ 剖 - 380 一 450 あがり 判定 、 処 理 
カー ド の 選択 は 大 文字 の Al-IML パス する 470-580 ケー ム 綴 了 判 定 、 処 理 
上 3 600 一 630 出せ る か どう か 判定 
と き は それ 以外 の キ 30NK 導 力 の 生 952 らい 
と き は リタ ー ン キー 不要 ど だけど 、 そ の か わり 680-910 画面 作成 
930--960 名 種 数 値 表 示 


1 


1 4 大 了 間 の MI に ASAI 


ぐふ つ ー の 7 な ら べ 。 テ ー ブ ル も あつ て 、 勝 つた 人 の 顔 の 表情 が お も し ろ い 。 純粋 な / な ら べ も いい サド 、 
A が 出 だ なら K か らし か 出せ な いと いう 、 イ ジワ ル な / な ら べ も 考え て ネ ! 


表 何 * 


189 IF TN<>4 THEN 270 

199 '@@e@@@ PLAYER'S TURN @@e@@@ 

209 FOR L=1 TO 39:NEXT:BEEP 1:FOR L=1 TO 
29:NEXT:BEEP 9 

219 COLOR 7:LOCATE 67.29:PRINT "Select Cc 

ard "5:LOCATE 67.21:PRINT " ,please ? 

"LOCATE 78.21:C も =INPUT も (1):PRINT C も :C= 

INSTR( "ABCDEFGHI JKLM" ,C ゃ ) 

229 IF C=9 THEN LOCATE 67,29:PRINT SPC( 1 

3)4LUOOATE 67.21:PRINT SPC(1315GOTO 279 

239 IF C>NH(4) THEN 219 ELSE A=PH(C)\1009 
・B=PH(C) MOD 199:GOSUB 599 

249 IF JD=9 THEN 219 ELSE FOR LC TO NH( 

4)-1:PH(L)=PH(L+ 1 ) :NEXT 

259 PH(NH(4) )=9:NH(4)=NH(4)-1:GOSUB 640: 

GOTO 329 

269 COLOR 2:LOCATE 67.23:PRINT " CAN'T P 

ASS" EiCOLOR 7:EOR L=E1 TO 19:BEEP 1:BEEP 9 
・NEXT:GOTO 219 

279 '@@e@@@ COMPUTER'S TURNS @e@e@@ 

289 FOR L=1 TO 13:FOR A=1 TO 4:B=CT(L):1 

F HD(TN,A,B)=9 THEN 300 

299 GOSUB 599:IF JD=1 THEN IF TN=4 THEN 

269 ELSE NH(TN) =NH(TN) - 1 :GOTO 329 

399 NEXT _A:NEXT LCOLOR 2:LOCATE 67,20:P 

RINT "P. "iTNi "PASSED  ":FOR 上 L=1 TO 39:BP 

EP 1:BEEP 9:NEXT:FOR し L=1 TO0 199:NEXT 

319 PT(TN)=PT(TN) - 1 :PZ=PZ+1:GOSUB 929:LO 

CATE 67.29:PRINT SPACE$(13)::GOTO 369 

320 '@@@@@⑨ PLACING CAR[)  @e の の の 

339 HD(TNJA,JB)=9:CD(A,B)=1:BEEP 1:BEEP 69 
・COLOR 7-A 

349 FOR L=1 TO 4:LOCATE 19+4xB,4XA+L-1:P 

RINT T$(L)::NEXT ELOCATE 12+4xXB,1+4xA 

359 PRINT ST も $(A)+CHR$ も (29)+CHR も (29)+CHR や も ( 

31 ) +NM$(B)::GOSUB 9260 

369 IF NH(TN)<1 THEN 379 ELSE TN=TN MOD 

4+1:GOTO 170 

379 '@@@@⑨ [FINISH @@e@ の の の 

389 FOR LO=1 TO 5:BEEP 1:FOR L=1 TO 59:N 

EXT:BEEP 9:FOR L=1 TO 99:NEXT : NEXT 

399 CLS:COLOR 2:LOCATE 20.21:PRINT "P.": 

TN: "FINISHED AND GOT "iPZ・ "ptsS" 

499 COLOR 7:ON TN GOTO 429,419,439,449 

419 LOCATE 37,1:PRINT "/ へ て "ELOCATE 37 
s2<PRINT "ーー イーm "ILOCATE 37。3:PRINT "上 

ユキ 上 "リーGOTO 449 

429 LOCATE 6.4:PRINT "/ SN "ELOCATE 6.5:P 

KINT "1 2 上 SLOUATE 6 ZIPRIMI テー ニス "(LOCA 

TE 6.8:PRINT "1 へ 17"ILOCATE 6.9:PRINT "ーー 

ーー "EGOTO 449 

439 LOCATE 68.5:PRINT "111 "ELOCATE 69, 

7:PRINT "ツレ ーーー ゴ "ELOCATE 69.8:PRINT "ーーー 

0 

449 PT(TN)=PT(TN)+PZEGOSUB 929:TIF PT(TN) 

>49 THEN 460 

459 FOR L=4 TO 19:LOCATE 14.LEPRINT_ SPAC 

E$ も (52):NEXT:ERASE CD,HD:GOTO_ 190 

409 '@@e@e@@ GAME END @@e の @ の の 9 

479 BEEPILOCATE 14.23:PRINT “GAME _ OVER" : 

FOR LE1 10 1599:NEXTEWIDTH 49:COLOR 5 

489 LOCATE 9.7:PRINT_ USING "WINNER IS P 
"KTNi:TF TN=4 THEN PRINT “" (YOU )" 

499 LOCATE 18.9:PRINT_ USING "性 仁 ptS" EEPT( 

TN):COLOR 6 


599 ILETNEFEOR LE1 TO0 3:LLELI MOD 4+1:GE( 
L)=LL:NEXT 

S19 IF PT(GE(1)) く PT(GE(2) ) THEN SWAP GE( 
1)。GE( 2 ) 

SZ9 IF PT(GE(2)) く PT(GE(3) ) THEN SWAP GE( 
2) ,GE(3) 

539 IF PT(GE(1)) く PT(GE(2) ) THEN SWAP GE( 
1 ) ,GE(2) 


S549 FOR 上 L=1 TO 3:LOCATE 13,11+2%L:PRINT 
USING "P_. 持 。 拉 拉 粒 PtS"iGE(L)iPT(GE(L) ) * 
SS59 IF GE(L)=4 THEN PRINT "(YOU)“ 

S69 NEXTECOLOR 2:LOCATE 13.23:PRINT "REP 
LAY 2 (Y/N)“" 

S79 K$=INKEY$:1F K$ も =" "| THEN 579 ELSE IF 
K$="Y" OR K$="y" THEN RUN 39 

S89 IF K$="N"_ OR K$="n" THEN 979 ELSE 57 
り 


ブロ 7 


ジェ ッ 


o99 '@@e@@@ JUDGMENT SUB . @@e@@@ 

699 IF B=7 THEN JD=1:RETURN 

619 IF B>7 THEN IF CD(A,B-1)=1 THEN JD=1 

・RETURN 

629 1F B<7 THEN IF CD(A,B+1)=1 THEN JD=1 

・RETURN 

639 JD=9:RETURN 

649 '@@e@@@ EXPRESSING HANDS SUB 、 @e@e@@ 

659 CLS:LOCATE 14.29:PRINT LEFT も ("AA B 
過 D 届 F G H ! り K 1 
M ",4%NH(4) ):FOR LO0=1 TO NH(4):COLOR 

7-(PH(LO)\190 ) 

669 FOR L=1 TO 4:LOCATE 19+LOX4.20+L:PRI 

NT T$(L)::NEXT:LOCATE 12+LOX4.22:PRINT S 

T$ も (PH(LO)\199 )+CHR$( 29 )+CHR$( 29)+CHR$(31 

)+NM$ も (PH(LO) MOD 199):NEXT:RETURN 

679 '@@e@e@@ UMAKING SCREEN SUB . @@@@@ 

689 CLS 3:C$=CHR$( &HCC )+CHR$( 8&H9 )+CHR$( 8 

H9 )+CHR$( &H33)+CHR$( &H9 )+CHR$( &H9 ) 

B9 INE(112.32)-(527。32) 11 し UNE-(591,15 

13LTNE こ (46.159) 1 し LINE こ (112)32) ,1 

799 PAINT(329.199)、C$,1:LINE(48,169)-(S59 

1.167),1,BF:RETURN 

719 '@@e@e@@ COMP'S FIGURES SUB . @ の の @@ 


720 LOCATE 23.9:PRINT "P.2 の pe 
LLL_LL_LL_LL_I W0 

739 LOCATE 23.1:FRINT “ ・ と 
N ・ ト rーPRIZE-ー“" 

749 LOCATE 23.2:PRINT "POINT JH Ss 
デ | 馬 

759 LOCATE 23.3:PRINT "REST トーーーー ャ エー 
ーー イーーーーーー ツ | 

769 LOCATE 3.9 :PRINT "rrTTm リー ELOCAT 
に 員 。4 だ に RIMT。 "た ーーー ニ ーー 

た 明 LOGCATLE 9.I EPRINT “14I1ITITO 交 60CAT 
E 68,.2 :PRINT の F へ “ 

789 LOCATE 3.2 :PRINT " 1111111" LOCAT 
EE 68.3 :PRINT "ニー エーーーーー 「" 

799 LOCATE 3.3 :PRINT "ニモ ーー LOCAT 
E 68.4 :PRINT "ロー イィ エー コー | 1『" 

899 LOCATE 3,.4 :PRINT " | 。 。1| "ELOCAT 
E 68.5 :PRINT "|- 日 - 1 デア“ 

819 LOCATE 3.5 :PRINT " | ーー へ "LOCAT 
E 68,6 :PRINT "トマ ー ン 了 

829 LOCATE 3.6 :PRINT " | ーー ィ イブ "LOCAT 
E 68.7 :PREINT "コー し 

839 LOCATE 3.7 :PRINT " | 義和 も 86CAA す 
E 68.8 :PRINT " 1 Me 

849 LOCATE 3.8 :PRINT "1 へ 、 17 LOCAT 
E 68.9 :PRINY " ニー コー デー テー 

859 LOCATE 3.9 :PRINT " | 1" 。 :LOCAT 
E 6B.19:PRINTI " ーーー テ ーー “ 

869 LOCATE 3.19:PRINT " ーー エエ ジア リー LOCAT 
E 68,11:PRINT " 1 

879 LOCATE 3。11:PRINT “ 「。 1 "7" :LOCAT 
E 68。12:PRINT " 1 隊 8 

889 LOCATE 9.12:PRINT "DP.1 |  “ 


899 LOCATE 9,.14:PREINT " POINT" ELOCATE 9。 
16:PRINT " REST 

999 LOCATE 71.14:PRINT " POINTTELOCATE 7 
163PRINU | NEST 

919 LOCATE 9.15:PRINT SPACE$ も (89) :LOCATE 
9 り .17:PRINT SPACE$(89):RETURN 

929 '@e@e@@ NUMERICAL VALUE SUB 、 @ の の の @@ 
939 COLOR 7:LOCATE 2.29:PRINT "P.4 (YOU) 
"LOCATE 2.22:PRINT "POINT" ELOCATE 2.23: 
PRINT "REST" 

949 COLOR 5:LOCATE 5.15:PRINT _ USING " 基 拉 拉 
"iPT(1):LOCATE 28.2:PRINT USING 本村 粒 " に PT 
(2):LOCATE 76、15:PRINT _ USING 「 半 拉 料 "PT(3 ) 
:LOCATE 8.22:PRINT _ USING "村人 "5PT(4) 

959 LOCATE 5,17:PRINT_ USING | 革 "5NH(T): 
LOCATE 28,.3:PRINT _ USING " 半 "KNH(C2):LOCA 
TE 76,.17:PRINT _ USING " 手 #"KNH(3) ELOCATE 
8.23:PRINT _ USING " 提 拉 持 "5NH(4) 

969 LOCATE 57,.2:PRINT_ USING の 拉 拉 "て PZECOI. 
OR 7:RETURN 

970 '@ee@e@@ LNI) @@@@@ 

989 COLOR 7:WIDTH 89:CONSOLE 9.25:CLS:ST 
OP OFF:) by Mr.ASAI 


そこ ん と ここ はお まけ お まけ の お 一 お まけ 。 だ けど 点数 は 渋く て 2 カラ ブラ ム 。 立 


ペア 〈④ み ちゃ ん トマ ト 〉 な いこ も いも こ 一 いな (内 閣 も 芋 評 うか いな マ ) (京都 府 ・ 火 星 工事 ) ぶち と 、 ム リガ あっ だ けど , 
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ラ / 


/ 


\7/08g-Og@ 川 川 


。owBASIC 

ヾ 、 を < 
う あ で 
りお 
滞る 
Mgtb 
CC Balchan SHOOTING ! 加 
GunnOSuK@ 大 う - ん 人 け 
に 記 2 

2 
楽し い バ ル タ ン 星 人 も どき いじ め ゲ (9 [ グ す 
ー ム 。 彼 の 名 は 、 ホ ント は 別に ある ん ( く ) | の 
だ けれ ど 、 ま だ 小さ い の で 自分 の こ と 7 う ム 。 月 
を は る ちゃ ん と し か いえ な い 、 さ きつ ち ば る ちゃ ん の 攻撃 が キミ に あたる と 、 へ ー ね じ せ 
ゃ ん みた いな 宇宙 人 な の だ 。 こい つ フ ォ ッ フォ ッ て 笑う ん だ よー PA あ 
下 て ちょ ろ ち ょ ろ 動 《 く "人 が キミ 。 い プ 


YZ 
肛 サン バレ ス 捕 多 


今回 生 場 の 「 ば る ちゃ ん 千 」( 注 : 某 『 バ 
ル 〇 ン 星 人 』」 と は まっ た く の 別 人 で す ) 
に は 、 そ の うち 復活 し て も ら お うか と 思 
っ て いま す 。 ま た 「 郡 之 助 」 は すでに 私 
の PC で 大 活躍 し て いま す 。 少 し は 期待 し 
て いて くだ さい 。 


潤い た り 消え た りす る 


が 赤く な っ て 、 


これ を 左右 の カー ソル キー で て 動か し て 、 
る だ と 思わ あれ る と この て スペース 
し ゅ り け ん ( 陸 裏 剣 ) が ヒュ ル 
ヒュ ル と な な め 上 に 飛ん で いく ぞ 。 カ 
ー ソ ルキ ー で 、 こ の し ゅ り け ん の 方 向 
を コン トロ ー ル する こと も で きる 。 
ば る ちゃ ん の 腹 に あだると そこ 


で も 、「 ば る ちゃ ん だ っ て 宇宙 人 だ い 」 
と ば か り に 、 上 空 か ら 攻 撃 し て くる の 
で 、 な めちゃ だ め だ よ ! 

一 参考 ーー 一 タカ ラ 『 チ ョ ロ 獣 ・ バ ル タ 
AN ジオ ツン オツ の オ ツ 。 


ー 1 


5 


一 変数 リス ト > 日 …… 人 の 横 位置 ・C$…… ば る ちゃ ん の 滑 去 用 。220 一 250 人 死ん だ 処理 

U PCE 0.4 @ HV CPP 人 の 向き @ |J cssss< ルー プ 汎 用 5 260--300 デー ニュ バン ポー リ いで 

HS…… ハ イス コア 。W-…… 人 の 向き 、 ワ ー フ 。 国 プロ プラム の 説明 。310 一 340 マシン コー ド デ ー タ 
Sr こり ・ Sentx ゆ の けん ・ ジ ラグ 。 10 一 60 初期 設定 。350-360 マシ ン 語 処理 

GN…… 人 の 残り 数 ・ ら 「…… し しゅり けん 位置 ・ 70 一 130 メイ ン 処 理 ・ 370 一 420 ば る ちゃ ん 絵 

X…… ば る ちや ゃ ん の 横 位置 。FR…… フ ァ イ ア ・ フ ラグ 。140-150 。 し ゅ り け ん 処理 ・ 還 チェ ン フ ボイン ト 

V…… ば る ちゃ ん の 向き 。 DE…… フ ァ イ ア 位置 ・ 160 一 190 ば る ちゃ ん や られ 処理 。 “ マシン 語 使 用 の だ め 打 ちこ みお わ つ だ 
F…… ば る ちゃん の 繧 の フラ ブ ・B1 お ーB5 お や …… ば る ちゃ ん の 繧 ・ 200 一 210 ファ イア 処理 ・ ら 竜 の だ め SAVE し よう 。 (だ か ) 


CLEAR399 , &HEFFF :GOSUB319 :EXEC&H319F:U ヤ 
人 


SCREEN1 , 2 ,2:CONSOLE9 ,29.9.9:COLOR15,1 
:CLS:PLAY"S8m8999o1132t64" 
PUT9,9,4:CHR$ も (11)“"(( Balchan Shooting 
1 )) HIGH"HS 
PUT26,1.4: "SCORE 9":PUT1.2.16: 
ukKe "i:COLOR12:PRINT "大 大 え " 
59 PLAY"cdeb8":SC=9:GN=3:X=18:H=X:HV=9:W 
=9:FORI=9TO0399:NEXT 
69 V=9:F=9:ST=9:FR=9:FORI=9TO099:NEXT:PLA 
人 
79 SOUND8, 31:HV=STICK(9):HV=(HV=7AND(H>9 
) ) -(HV=3AND(H く <38 ) ) : IFHVTHENW=HV 
89 A$=B】1$:IFFTHENA$=B2$ 
99 LSET:IFRND( 1 ) く UTHENV=SGN(H-X-2 ) :GOTO1 
19 
199 V=(X>32 ) -(X く 1 ) : IFV=9THENV=SGN( RND( 1 ) 
=> ら ⑤) 
119 X=X+V:F=(F=@) :H=H+HV:ONSTGOTO149:IFS 
TRIG(9)THENST=1:S=H+1:T=18 
129 PUTH,18.12:" "35:ONFRGOTO299: IFRND( 
1 ) く UTHENFR=1:D=X+1:E=6 
139 GOTO79 . 
149 PUTS,TJ1517 の ES=S+W:T=T-1: 
90RS>39THENST=9 : GOTO129 
159 PUTS,T,6i"x"iEIF(T=6ANDS>X+ 1 ANDS く X+5 
) =9GOTO1 29 
169 F=9:FORI=9TO8:A$=B3$: IFFTHENA$=B5$ 


"GunnOS 


IFT=40RS く 


ば る ちゃ ん の お な か に 


。 


179 LSET:PLAY"e48948":F=(F=9) :FORJ=9TO19 
・NEXT:NEXT:FOR1 = の TO049:NEXT 
189 SC=SC+19:PUT31 1 .4:SCi 
TS5,TL15i7 "5 EPUTDE,155“" 
199 PUTH,18.121 7 大 52X= INT(RND(1)*36+1) 
・GOTO068 

299 PUTD,E,15:“" 
TO79 

21 人 8 PaE+2:PUTD。E、20 の の の 9 
2 く <HANDD+ 4 >H ) =9GOTO76 

229 PUTH+1.18.19j "PiEPLAY"g24fedCCCCCCC 
CCC":IFSTTHENPUTSJTJ155 7 の 5 

239 FORI=9TO049:NEXT:F=9:FORI=9TO109:A$=B2 
$:IFFTHENA$=B4$ 

249 LSET:F=(F=9):FORJ=9TO19:NEXT:NEXT:FO 
RI=9TO49:NEXT 

259 PUTD,18.15)" 

"3 1GN=GN- 1: IFGNGOTO69 
269 COLOR1:LOCATE15.19:PRINT "GAME OVER! " 
::LINE(194.99)-(298.119),6,BF 

279 A$="S8m9999o1132t64geddgedr24gedfc12 
"iPLAYA も ,A$ も ,A$ も :IFHS く SCTHENHS=SC 

289 FORI=9T099:NEXT:PUT18.15.3j: “PLAY AGA 
IN? (Y/SPACE) "5 

299 IFSTRIG(9@)THENCOLOR15:CLS:GOTO39 

399 GOTO299 

319 DATA58,2C,e5,21.99,f9,Cd,96、9e,16.99 
>21。a9.94.19,eb,2a,3b 

329 DATAff,3e,94、91.97.99,ed,b9,e5,21 ,21 
,99,19.eb,e1 ,3d,29,f1 


: A$=C$:LSET:PU 


"5: IFE=18THENFR=9 : GO 
:IF(E=18ANDD- 


"PUT19+GN,。2、15:" 


] 


339 DATAe1 ,C9.99.99,cd,e4,9d,d5。cf ,2c,cd 
>eG4.9d,e3.65,24.6f ,2C 

349 DATAcd, 6d,11.e1,cCf ,。2cC,cd,e4.9d,32,93 
sfd。Cf ,3b,C3。81.98,.99 

359 POKE&HFAD2 。&HF9 : POKE&HFAD1 ,&H92:POKE 
&HFABE,&HF9 : POKE&HFABD, &H28 

369 RESTORE319:FORJ=9TO7 1 : READA$: POKE&HF 
999+J,VAL("&H"+A$) :NEXT 
379 C$=" 
:A$=CHR$( 26 ) : B も =CHR$( 27 ) 
389 B1$=" OoVo 2 2 
R$(25)+" 。 M(=)M 
399 B2$=" woVow 
= ) 


で 0 06 


お ( 
m"+A$+ リリ +B も +" 
W"+A$+" | "+B も +"W 


B5$="  xVx 
": RETURN 


本 "+A 和 も す "へ"+B$ も + "mm 


REM Balchan Shooting !! (Ver1l.1) 
REM for PC-6001mk2 _ No.23[17-14] 
REM 7 1985/93/13 14j56:56 
REM Copyright(C) 
BY GunjJima Kazuo 
and PROGRAM POCHETTE 


〈《 く ば る ちゃ ん シュ ユー ティ ング ! 〉 ば る ちゃ ん が 発 敵 す る よー こぎ つね の つの の 行列 みた を いな や つ に あだたら な いよ うに し な が ら 、 
ミサ イル を あて る 。 左右 に 動 こ て の が 、 ス ロー な の で 、 少 し は や め に 逃げ よう 。 


1 3 vv WW WW WW WW W WNW _ B 8 W _ W BR B 呈 2 


@ 
! 及 質 向 郎 今年 は 、』 
受験 生 な の で 、 受 1 
験 勉強 を が ん ば ろ 
| うと 思っ て いま す 』 


こん に ち は ! ぼく は 
福島 県 到 葉 郡 浪江 町 の 
浪江 町 立浪 江 中 学 3 
年 の 志賀 徹郎 で す 。 邊 
この プロ グラ ム は 、『 


と だ けど 、 ユ コントロール は スペ ー ス キ 


- ーー すぎ る ほ 、 す で 天井 と ぶつ か っ て し ま 
プ ” 本 語 に する と わが る 。 ケリ グリ と か いく で っ て 、 水 鉄砲 


5 人 あき ら め て いま し た 。 和 ョ 

ちょ うど 、 小 学校 の 低 学 年 の ころ に の 出 日 か ら ス ーッ と 出 て し まえ ば 、 1 し それ な の に 掲載 され 

夢中 に な っ た 「 水 鉄砲 」 の よう な 画面 。 面 ク リア 。 人 て 感動 し て いま す 。 

、 5 今年 は 受験 電 強 を 8 

この 水鉄砲 の 左 の 日 か ら 右 の 日 へ と 、 と ころ て 、 こ の ゲー み ム の ク グイ トル は 8 が ん ば る つも り . - 
他 の 障害 物 に あたら な いよ う 、 2 ドッ 「REVO EMAG』j。 ね 、 な ん と な く 見 7 


ト の キャ ラク タ を 操作 する の が この ゲ 。 た こと の ある タイ トル で し ょ う 。 

ニム だ と の 手 の ゲ アーム に まで く あるこ この タイ トル に 気づい だ の は 、 オ サ と き は いつ も 反対 の 映像 を 見 て る の で 、 

ム ひ と り 。 すぐ に カラ クリ が わか っ た 。 は ほら 、 反 
与 真 を 撮る 対 か ら 読 むと 、GAME OVER。 


19 SCREEN3, 2 ,2:COLOR3 , 1 , 1 :CONSOLE , , , 9 :CL 
S:LINE-(256,192),,B 

29 LINE(9,9)-(39,139):LINE-(39,9):LINE(9 
,62)-(39,192) 

39 LINE-(59,162):LINE-(79,192) 

49 LINE(256,9)-(226,1309):LINE-(226,9) :LI 
NE(256,62)-(226,192) ' 

59 PAINT(2,1),,3:PAINT(2,199) ,,3:PAINT(6 
9,199),,3 

69 PAINT(249,3) ,,3:PAINT(253,199) , , 3 

79 COLOR1: LOCATE3,19: PRINTM" メ ン クリ ヤ !": 
COLOR3 

89 FORI=9TO29 

99 RX=INT(RND(1)x176)+45:RY=INT(RND( 1 ) 1 
85) :LINE(RX,RY)-(RX+9,RY+9) , ,BF 

199 NEXT 

119 X=2:Y=31:TA$="REVO EMAG" 

129 LOCATE4 , 1 :PRINTTA$ 

139 X=X+1:IFX=254THEN249:G=STRIG(9) :IFG= 
THENY=Y+5:GOTO169 

149 G=STRIG(9):IFG=9THENY=Y+5:GOTO169 
159 Y=Y-5: IF Y<9 THEN Y=9 

169 IFPOINT(X,Y)=3 OR Y=9 THENPLAY "07L.32 
CCC" : GOTO199 

179 PSET(X,Y) :PSET(X-1.Y-1) :PSET(X-1,Y): 
PSET(X,Y-1 ) : SC=SC+5 

189 PKESET(X,Y) :PRESET(X-1,Y-1 ) : PRESET(X 
-1,Y) :PRESET(X,Y-1) :GOTO139 

199 COLOR4 : LOCATE4 。7:FORI=9TO1STEP- 1 : PRI 
NTMID$(TA$,1,1)::NEXT 本 


* す RT や 


。 う 人 き 叶 / ロ 圧 S 村 
と ざ 


Jr9t0rt さ は 


9 ミ に 
29 LOCATE3,8:PRINT"SCORE" :SC:PLAY"04L2S | ロン の の Y 下 本 RI 2 
19M26999CCC8CD+D8DC8C03B804C1 RE AR 
219 LOCATE3,13:PRINT "HIT SPACE !" マー…… ド ツ ト に の Y 忠 禁 。 110 初期 値 設定 
229 IFSTRIG(9)=9THEN220 TAS…… タ イト ル 用 20 タイ トル 表示 
239 GOTO19 SC…… ス コア ・ 130 一 180 ドッ ト 表 示 
249 COLOR4:M=M+1 ELOCATE3.19:PRINTM" メン クリ M… 面 。・ 190 GAME OVER 表示 
ャ 1 "iPLAY "04S19M29999L8GB4BA4AB2 G…… ス ベース を 押し た と き の 全 。 200 スコ ア 表 示 、 音 楽 
・ 210 一 230 REPLAY の 処理 


259 COLOR3:GOTO89 還 プ ロブ ラム の 説明 
10 一 60 初期 設定 、 画 面 作成 。 240 一 250 面 を ウリ アタ し だ と き の 負 理 


* 槍 ジェ ッ ト 4 人 みちゃ ん トマ ト 〉 いな り だ べ だ りな い (いな り 、 入 べ 足り な い ) (愛知 県 吉越 弘幸 フン ) ぶつ まい!」 いや いな り じ ゃ っ っ 
ゴル " な く て 、 逆 さ 言 葉 の こと 。 夢 の 中 で 考え つい だ ん だ つて 。4.5 カ ラブ ラム 。P.S. お 互い 体 を 大 切 に し まし よう ネ ! 


\%OO9-Cg9 


スペ パー ズ ガ あま つう つ だ 
の で 森 こ ん に つい て 


足 の いっ ぱい つい て いる 宇宙 船 が 、 
スペ ー ス スパ イダ ーX 号 。 カ ー ソ ルキ 
ー で 移動 する の だ 。 で 、 カ ー ソ ルキ ー 
を 押し な が ら ス ペー スキ ー を 押す と 、 
シュ ワッ と 電磁 ネッ ト が 前 方 に 広がる 。 
これ で 、 ナ べべ み た いな か 宇宙 船 (スペ ー 


スモ ツル) を つが まえ る ゲー ム だ 。 

と ころ が 、 こ の スペ ー ス モウ ル の 出 
す レ ッ ド フィ ー ル ド が こわ い 。 レッ ド 
グイ オーク ルルド に か こま れ で し まう と 、 ズ 
2 パイ ダーX 号 の 機能 は すべ て 停止 し て 
し まい 、 最 後に は 消滅 し て し まう の だ 。 
も ちろ ん 、 モ ウル に ふれ て も 同じ こと 
が お きる 。 

この 、 レ ピッ トド フィ ー ル トト が ら の が むれ 
つつ 、 キ ミ は 何人 台 の スペ ー ス モウ ル を 
電磁 ネッ ト で つか まえ られ る か >。 

と さろ で 、 あ ララ この グー ム に つい て 
説明 し な くち ゃ いけ な いこ と は み ー ん 


な 書い て し まっ だ の に 、 ハ ッ ト リ くん 
が いっ ぱい 文字 を 入れ る スペ ー ス を 取 
う 下 も し ま ら だ の で 、 い に き な かり ミ の 作 基 
の こと を 書い て みょう か な と 思う 。 
テク ノ ポ リス や ポシェ ッ ト へ の 投稿 
者 の な か に は 、 な ん と な く 〈 く 印象 に 残る 
人 っ て の が いる ん だ よね 。 い つも お も 
し ろ い ブロ グラ ム を 送っ て くれ る 人 は 
(た と えば M 5 の KNT と か 、 88 の 柳田 
英俊 と か 落合 和彦 し か MZ-700 の グラ 
ム 総 理大 臣 ・ 宮 後 
泰 孝 と か ) ま 、 あ 
だ り ま えん が ん だ け 
を se (を きま は あく 
採用 し て いる わけ 
で も な い の に な ぜ 
か 覚え を て いる の が 
この ゲー ム の 作者 
・ 和 株 免 な の だ 。 と 
いう の も 森 く ん の 
作品 は 、 ど うい う 


4 左 が スペ ー ス 
スパ イダ ー、 右 
が スペ ー ス モウ 
ル 。 両 者 に ら み 
あっ て お り ま す 。 


> スペ ー ス スパ イ 
ダー の 右 に 発生 し 
た の が レッ ド フ ィ 
ME。 な がい 
き な り で こわ いな 。 


わけ か 色づか い が 


し II WW Ho Mo Mo WM 委 旧 邊 自 】 


「」 6 
すす) | 
林 『 
m る どの れ わ に 
めい い な 』 
ntt に な て ー 
sm しゃ し ) た 
て 高 ば こ -』 
AS かさ 
ね な プ コ ら 』 
m+ つっ 口 度 * ン ジョ 
mf た だ ブ 日 ) 
mr レ し の ラ な ヤ ョ 
ama くす 送 1 
ョ 1 コム 
ョ O ジ な 験 = 
だ YY か 1 
エン つ Bl 
mW ご > 送 た W 
ms れ け | 
% 7 


4 
W 
| 
W 


独特 で 、 見 た と だ ん 、「 モ リア キラ だ 」 
9 の 936 しま の 7 に 測 机 り だ 0 たい 
6001 の 採用 候 伴 作 が 出 を ろ っ た と き に 
見 わた し て いる と 1 つ 妙 な 色 の 画面 が 
まじ っ て いて 、 そ れ が だ いた だ い 森 晃 な 
の だ 。 お 手紙 も 、 必 ず お か し な イラ ス 
ト を 書い て き て くれ る の で こう し て ゲ 
ー ム の 説明 を まとめ て いる と き の ち ょ 
っ と し た 息抜き に な っ て 楽し い 。 

森 く ん の 作品 の フシ ギ き は 、 彼 の マ 


ニコ ニコ し て は じ め だ の 。 な ん こと 30。 


険 、〈RED FIELD〉 は じ め て や つ だ ら 20 し か いか な いで や ん の 。 と な り に パン プ が い だ か ら 、「 や つて ご らん 」 と 言 つ だ ら 、 
「 ゆ め み と 10 し ガ 差 が な いよ 」 こ と 天 つ だ ら 次 に いき な り /70 出 し た の 。 番 生 。 


ン が の お か し る と と て も よく 似 て いて 、 
ラロ グラ ム つ て いう の に $ ホ ポン トト に よさ 
《 性格 と か クセ っ て 出る ん だ な あと 思う 。 
きっ と 、 絵 と か 作文 と か に その 人 の な 
に が が 測 て し まう の と 同じ ご と が アロ 
グラ ム に も ある ん だ ろう な ーー。 


一 変数 リス ト 。 LM.E,F,J.K…… 電 磁 ネ ツ ト 座 標 
X.Y…… 自 分 の 座標 ・ KA.T.P…… ド レッ ツ ド フィ イール ド 設 定 
X1.Y1…… 自 分 の 物 動 用 。 AS$… 自 分 の キャ ラフ マタ 
G.H…… 敵 の 座標 。 BS$… 敵 の キャ ラフ クタ 
G1.H1…… 敵 の 移動 ・ 画 プ ログ ラム の 説明 


テッ 


表 


| 本 


19 SCREEN 3.、2.2:CLS:CONSOLE ,、。9:Y(}) 
X(3)=1:Y(5)=1:X(7)=-1:SC=9 
29 A$="+ ォ オリ"+ ォ CHR も (29)+"X"EB$ も ="O"+CHR$ も (29)+" 


39 T=19:KA=45:G=14:H=14:GOSUB699 

49 GOSUB79:IFINT(RND( 1 )xT ) =9THENGOSUB1 7 
59 IFINT(RND( 1 )x5) =1THENGOSUB259 

69 GOTO 49 

79 S=STICK(9):X=X+X(S):Y=Y+Y(S) 

89 IFX く 9THENX=15 

99 IFX>15THENX=9 

199 IFY く 9gTHENY=13 

119 IFY>13THENY=9 

129 COLOR 1:LOCATEX1」Y1:PRINT A$ 

139 COLOR 2:LOCATEX ,Y:PRINT A$ 

149 IF(X=G)AND(Y=H)THENPLAY "t255s1 4m19oO 
7bgecbgeco6a":GOTO 559 

159 IFSTRIG(9)=1THENGOSUB349 

169 Xl=X:Y1=Y:RETURN 

179 A=INT(RND( 1 )x249):B=INT(RND( 1 )x167) : 
C=A+KA:D=B+KA-5 

189 IFD>167THEND= 167 

199 LINE(A,B)-(C,D),4.B:PLAY "t209Ss4m10999 
oO89":FORT=9TO2:GOSUB79: NEXT 

200 ピ =7+X%16: ド =7+Y%12:PLAY"t299S4m109909o1 


219 LINE(A,B)-(C,D) , 4 、BF 
22Z9 IFPOINT(E。F) く >4THEN2469 
239 PLAY"t255s14m199o6bagfedcolb":GOTO 5 


249 LINE(A,B)-(C,D) , 1 , BF : RETURN 

259 Gl=G:H1=H:G=INT(RND(1)x15) :H=INT(RND 
(1)x13) 

2690 PLAY"t299Ss4m599o59" 

279 COLOR 1:LOCATEG1 ,H1:PRINT B$ 

289 COLOR 3:LOCATEG,H:PRINT B$ 

299 RETURN 

399 COLOR 1:LOCATEG,H:PRINT B$ も :G=14:H=14 
・SC1 =SC:COLOR 1 

319 LOCATE9.14:PRINT "SCORE/ "SC1:COLOR 3: 
ら SC=SC+19:LOCATE9 , 1 4 

329 PRINT "SCORE/ "SCEP=P+1: IFP=3THENP=09 : 
T=T-1:KA=KA+10 

339 RETURN 

349 し =7+GX16:M=7+Hx12:ONSGOSUB3609 , 359, 38 
9 .359,499,359,420 

359 RETURN 

369 E=XX16:F=Yx12:J=E+12:K=F-59:IF(G=X)A 
ND(F >M) AND(K く <M ) THENPO0= 1 

379 GOTO 449 

389 E=XX16+14:F=Yx12:J=E+65:K=F+19:IF(H= 
Y)AND(E く <L)AND(J>L ) THENPO= 1 

399 GOTO 449 

400 E=XX16:F=Yx12+19:J=E+12:K=F+59:IF(G= 
X)AND(F く M) AND(K>M ) THENPO= 1 

419 GOTO 449 

429 E=Xx16-1:F=Yx12:J=E-65:K=F+19:IF(H=Y 
)AND(E>L)AND(J く < く L )THENPO= 1 

439 GOTO 449 

449 IFE く 9THENE=9 


170 一 240 レッド フィ ー ル ド 表 示 
*250 一 290 敵 の 移動 


10- 30 初期 設定 ・ 300 一 330 スコ ア 表 示 
40 一 60 メイ ン ル ー チ ン ・ 340 一 540 電 盛 ネッ ト 表 示 
70-160 自分 の 物 動 。 550-680 ゲー ム オ ー バ ー 
・690-820 デモ 


459 IFE>252THENE=252 

469 IFF>167THENFE= 167 

479 IFF く 9THENF=9 

489 IFJ く 9THENJ=09 

499 IFJ>252THENJ=252 

S99 IFK>167THENK=167 

519 IFK く 9THENK=9 

S29 PLAY "t255s14m199o7d":LINE(E,F)-(J,K 
あの R 

S539 IFPO= 1THENPO=9 : GOSUB399:PLAY"t255s1 4 
ml9o49":LINE(E,F)-(J,K) ,3,.B 

S49 LINE(J,K)-(E,。F ) , 1.B:RETURN 

S59 FORCO=9TO4:LINE(XX16.YX12)-(XxX16+15, 
YX12+19) 、CO,BF :NEXT 

S69 FORI=9TO1999:NEXT 

579 LINE(A,B)-(C,D) , 1 ,BF 

S589 COLOR 2:LOCATE4.9:PRINT "G":COLOR 3: 
LOCATE6,1:PRINT "A" 

S599 COLOR 4:LOCATE8.2 EPRINT "M" ECOLOR 2: 
LOCATE19.3:PRINT "E" . 

699 COLOR 3:LOCATE5.3:PRINT "0":COLOR 4: 
LOCATE7 ,4:PRINT "V" 

619 COLOR 2:LOCATE9.5:PRINT "E":COLOR 3: 
LOCATE11.6:PRINT "R" 

629 COLOR 4:LOCATE1.8:PRINT "YOUR SCORE" 
・A$ も 1 SC 

639 IFHS<SCTHENHS=SC:PLAY PL1$,P3$: GOTO 
650 

649 PLAY "cbcacgcfcecdcc" , "bcbdbebf bgbab 
b" 

659 COLOR 2:LOCATE1 、19:PRINT "HIGH SCORE 
"AA も jHS 

669 COLOR 3:LOCATE1 ,12:PRINT "PUSH [SPAC 
記 1 よ デ 

679 IFSTRIG(9) =9THEN670 

689 GOTO 19 

699 PL1$="t255s14m5o5edcr4cr4edcr4cr4er 4 
gdr8er4ger4Cecr4CCCcc" 

799 P2$="t255s14m5o6r4cder4er4cder4er3gr 
4edr8gr4edr4cder4eeeee" 

719 P3$="t2555s14m5o4r2bagr4gr4bagr4gr4fr 
4ddr8fr4dfr4bagr499g999" 

729 P2$="t255s14m5o6r4cder4er4cder4er4gr 
4edr8gr4edr4cder4eeeee" 

739 FORI=9TO5 

749 XH=RND( 1)x219:YH=RND(1)%169:XY=39+RN 
D(1)x15 

759 LINE(XH.YH)-(XH+XY,YH+XY ) , 4 .BF 


769 NEXT 
779 COLOR 3:LOCATE1.5:PRINT A も Si ECOLOR 2: 
PRINT " RED FIELD ": 


789 COLOR 3:PRINT B$ 

9 PLAY PELIS  P2 も 、P3$ 

899 FORI=9TO10009:NEXT 

8190 LINE(9.9)-(255.195).4.BF:LINE(0,9 )-( 
255.195).1、BE 

829 COLOR 4:LOCATE9、14:PRINT "SCORE/":SC 
・RETURN 

839 REM * RED FIELD 

849 REM x by MORI AKIRA 


〈《⑰ み ちや ゃ ん トマ ト 〉 みん ち は ち ん み (ミン チ は 珍味 ) (兵庫 県 ・ 生 田 の ヤン バル フイ ナ ) 立 う ー ん 、 こ れ は 知 つ て いる ……。 


條 ! あ ミン チ っ て メン チカ ツ の こと な ん だ よ ネ 。 1 カラ ブラ ム 。 


\O09-Cg@ 


ぼく は 1 
年 で や っ と BAS 
IC を マス ター し た / 


1 ヵ月 で BASIC を マス ター し まし た 。 と 
書く 人 が いま す が 、 それ が どう だ っ て い 
うん だ 。 ぼく は 、1 年 で や っ と BASIC が 
使い こなせ る よう に な っ た ん だ ぞ 。 今 は 
マシ ン 語 を 勉強 し て いま す 。 と いい つつ 、 
テク ノ ポ リス 様 、 ど う も あり が と う ご ざ 
いま し た (が っ し ょ う )。 


ト BI I HE 』 BB ME IM は 8 A 3 8 i 。 


の の 


プ ブルー ス に 父 を 殺さ る れ だ た チ 
の か だき うち 。 人 の 壮 ん 
て くれ た だ 、 敵 の 技 を 一 時 的 に 
封じ こめ る 魔法 の ペン ダン ト 
を 胸 に 、 チ ェ ン は 敵 の アジ ト 


 ) 


4 いざ つ ! 父 の カツ キ じ ゃ あつ ん 〆 


の 2s2E つ て いつ 7 だ" 6 っ た だ た ら 、 チェ ン が 勝ち 次 の 面 へ 。 
左 の 青い キャ ラク タ が チェ ン 、 魔法 も 使 を み 。 ス ペー スキ ー で 
赤い キャ ラク タ が ブル ー ス が だ 。 相手 の 攻撃 が 止ま っ ちゃ う よ 。 


左右 移動 し 上 ジャ ンプ は カー ソル 腸 参 おち ーー マイ コン BASIC マ ガ ジ 
キー の HBIT 2 つい っ ぺん に 提 ン '84.10『 小 林寺 』 

じ 和 が な の 上 ジャ ンク グ も て きる 。 
技 は 3 種類 。 円 +LI で うし ろ げ 
り 、E+LI で と び げ り 、 そ し て は 
だ け で 正基 突き に な る 。 

画面 上 の ほう に な らん で いる 2 
本 の グラ フ は 、 残 0 り エ ネル ギー 量 
RC 、 請 の キン 、 赤 が 
プル ー ス の エネ ルギー だ 。 も ちろ y 員 十 蛋 で さら 
だ て 20 の だ らち 、 だ つい み ー の テッ 和泊 の だ 


プ ブルー ス の エネ ルギー が な 〈 く な りつ 1 まい つ 
だ ガ 、 は あ は あ 。 


日 士 で 必殺 
の つう し ろ げ り の ! 


19 DATA 69,198, 69,199、 62.192。 62.10/, 119 DATA 189,199,189,193,182.192.182.1093 
64.199, 64,195, 66,192, 66.1093 ,184.199,184.195,189.198,189,109 

29 DATA 66,106, 66,197, 68,199, 68,103, 129 DATA 182.196,182.197.186.192.186,107 
68,108, 68,109 >188.198.188,1093 

39 DATA 69.198, 69.199、 62、196, 62,10/, 139 DATA 176.192.189.192,.176、193,189.1093 
64.192, 64.195, 66,199、 66,105 >189,196.189、199,182.199、182,195 

49 DATA 68 ,196, 68.199, 68.192。 72,.102, 149 DATA 184,192.184.195.186.196,186.107 
68,103。 72。1093 188.198,188.199 

S59 DATA 69, 94, 69, 95, 62, 93, 159 DATA 176,194.189.194.178,195,189,105 
64。 93。 64, 96, 66, 91, 66, 96 >182、191.182。195.184,193,184.197 

69 DATA 68, 96. 79、 97,、 68, 98。 169 DATA 182、197,182.197.186,193.186,194 
68 。 98、 66 . 993 188,.195.188,195 

79 DATA 69,195, 69,195, 62,103, 194。 179 DATA1824191.192.191.182.192.192.1092。 
64.193。 64.197, 66,191, 66、,195 189,193,189.194.189,196,189,107 

89 DATA 66.197,.66,.197,.68.194.72.194.68,1 189 DATA182.193.182.107,184.193,184.194。 
95,79、195 186,1903,186,109 

99 DATA 56,.191, 66,191, 56,192。 66,102。 199 REM ショ キ 
62,193, 62.199, 64、193。 64.104 299 SCREEN 3.2.2:CLSICONSOLE 9.09 

199 DATA 66,193。 66,197,。 68,193, 68,104。 219 GOSUB1389 

68,196, 68,107 229 LOCATE 3.7:COLOR3:PRINT "PUSH SPACE" 


う 6 4 全 葵 、 (プルー ステ ェ ン 〉 カン フー の 映画 は 大 好き 。 な ん だ つて は ジャ ツキ ー ー チ ェ エン が 最高 だ ね 。 お も し ろ い だ け で な こく 、 も の す 
2② 要 , ご こい アフ ショ ヨン を いこ ぐつ も 見 せ て ぐれ る 。 今度 生ま れ て きだ 時 は 、 セ イン ト フ オー を 超え る 女 ジ ヤツ キ ー チ エン に な る ぞ 。 


239 IFSTRIG(9)=1THEN259 

240 GOTO 239 

259 LOCATE 3.7:COLOR2EPRINT "PUSH SPACE" 

269 X=1:X1=14:Al=9:B1=19:H=298:J=H:K=H:M 
=H:LE=1:R=5 

279 LOCATE 4.6:COLOR2EPRINT "GAME OVER" EL 
INE(69.199)-(199.199).2,BF 

289 LINE(82.52)-(298.52).3:LINE (82.56)- 
(208,56) , 4 

299 Cl=A1:Il1=3:RESTORE19:GOSUB1399:C1=B1 
・I1=4:RESTORE119:GOSUB1399 

399 GOSUB16309 

319 REM メイ ン 

329 IFSTRIG(9)=1THENH=H-3:GOSUB1519:GOTO 


339 R2=INT(RND( 1 )xR)+1:IFR2>1THEN389 
349 IFX1 =X+2THEN1 149 

359 IFX1=X+1THEN1969 

369 IFX1=X-1THEN1229 

379 IFX1=X-1THEN1220 

389 IFX]1 >XTHEN989 

399 IFX1 く XTHEN1920 

499 ST=STICK( 9 ) 

4190 IFST=7THEN529 

429 IFST=3THEN579 

439 IFST=8THENG= 1 :GOTO629 

449 IFST=1THEN629 

459 IFST=2THENG=2:GOTO620 

469 R1=INT(RND( 1 )*3)+1:IFR1=30RSTRIG(0 ) = 
1THEN31 09 

479 IFST=6THEN909 

489 IFST=5THEN730 

499 IFST=4THEN81W 

S599 GOTO3109 

S519 REM My イト に ウ ( ヒ ダリ) 

529 IFX=10RX1=X-1THEN310 

S539 GOSUB1339 

549 Al=A1-19:Cl=A1:1Il=3:RESTORE19:GOSUB1 


559 X=X-1:GOTO319 

569 REM My イト “ ウ ( ミ キ ~ ) 

579 IFX=140RX1=X+ITHEN319 

589 GOSUB1349 

599 Al=Al+19:Cl=Al:I1=3:RESTORE19:GOSUB1 


699 X=X+1:GOTO310 

619 REM My ジャン パ 

629 GOSUB1349 

639 IFG=1ANDX1 く >X-2ANDX=>3THENA1=A1-10:G 


649 IFG=2ANDX1 く >X+2ANDX= く 12THENA1=A1+10: 


659 RESTORE59:Cl=A1:I1=3:GOSUB1309 
669 GOSUB1699 

679 LINE(69+A1.91)-(79+A1.99) .2.BF 
689 IFG1=1THENA1=Al-109:X=X-2 

699 IFG1=2THENA1=Al+10:X=XX+2 

799 RESTORE19:I1=3:C1=A1:GOSUB1 399 
719 G=9:Gl=9:H=H-2:GOSUB1519:GOTO3109 
720 REM My セイ ケン ツ “ キ 

739 GOSUB1349:C1=Al1 

749 RESTORE39: [1=3:GOSUB1399 

759 GOSUB16909 

769 IFX1=X+1THENK=K-4:GOSUB1549 

779 GOSUB1349:LINE(79+A1。192)-(72+A]1 、103 
) 。2.B 

789 RESTORE19:I1=3:GOSUB1309 

799 GOTO319 

899 REM My トビ “ケリ 

819 IFX1=X+10RX=13THEN319 

829 GOSUB1349:Al=A1+19:C1=A1:XX=XX+ 1 
839 RESTORE79:T1=3:GOSUB1399 

849 GOSUB1600 

859 IFX1=X+1THENK=K-19:GOSUB1549 

869 GOSUB1349:LINE(79+A1,.194)-(72+A1.195 
) 2 DB 

879 RESTORE19:I1=3:GOSUB1399 

889 GOTO319 

899 REM My ウシ ロケ “ リ 

999 GOSUB1349:C1=A1 

919 RESTORE99:I1=3:GOSUB1300 

929 GOSUB1609 

939 IFX1=X-1ITHENK=K-8:GOSUBI540 

949 GOSUB1349:LINE(56+A1,191 )-(58+A1 ,1092 
) 。2。B 

959 RESTORE19:I1=3:GOSUB1390 


7g7 パ 


ホブ ェ ッ 


969 GOTO319 

はず REM アキ イト ドウ ( じ お "りり ) 

989 IFX1l=X+1THEN400 

999 GOSUB1369:B1l=B1-19:X1=X1-1:C1=B1 
1999 RESTORE119:T1=4:GOSUB1399:GOTO499 
1910 REM テキ イト ^ ウ (ミキ ) 

1920 IFX1=X-1THEN4090 

1939 GOSUB1369:B1l=BI+19:Xl=X1+1:C1=B1 
1949 RESTORE119:IT1=4:GOSUB1399:GOTO400 
1959 REM テキ セイ サン ツ “ キ 

19690 GOSUB1369:C1=B1 

1979 RESTORE139:11=4:GOSUB1390 

1989 GOSUB1606 

1999 H=H-8:GOSUB1519 

1199 GOSUB1369:LINE(176+B1.」102)-(178+B1 , 
I 旧 8)。2B 

1119 RESTORE119:11=4:GOSUB1309 

1120 GOTO400 

1130 REM テキ ト ヒ “アリ 

1149 GOSUB1369:B1l=B1-19:X1=X1-1:ClsBI 
1159 RESTORE159:11=4:GOSUB 1309 

1169 GOSUB1690 

1179 Hs=H-14:GOSUB1519 

1189 GOSUB1369:ILINE(176+B1,194)-(178+B1 。 
195).2.B 

1199 RESTORE110:I1=4:GOSUB1300 

1299 GOTO 499 

1219 REM テキ ウシ ロア“ リ 

1229 GOSUB1369:C1=B1 

1239 RESTORE179:!1=4:GOSUB1399 

1249 GOSUB1699 

1259 H=H-12:GOSUB1519 

1269 GOSUB1369:LINE(199+B1,191 )-(192+B1 , 
192),2.B 

1279 RESTORE119:11=4:GOSUB1300 

1289 GOTO499 

1299 REM カク (My ト テキ ) 

1399 FORI=1TO7:READA,B.C.D 

1319 LINE(A+C1.B)-(C+C1 。D) TI1ENEXT 

1329 RETURN 

1339 REM My ケス 

1349 LINE(69+A1.199)-(68+A1.199),2.BF: RE 
TURN 

1359 REM テキ ケス 

1369 LINE(189+B1 199)-(188+B1.109).2,.BF: 
RETURN 

1379 REM カメ ン 

1389 LINE(49.49)-(211.139) ,2,BF 

1399 PAINT(9.9).4、.2 

1499 LINE(49、119)-(210.13 り ) ,1,BF 

1419 DATA 50.51 .S0、5/,53。51 .53,92,55.51 , 
の の 2 の うつ も 4 を 、D93、D55 906。51 56、5/ 

1429 DATA 61.56.61.57.63.51.63.57.67,51。 
67、5/、70、51 67、51 79.54.6/,54 

1439 DATA 79.57.6G,、57.74.51 、74.57 78.57。 
74.57 

1449 RESTORE 1419 

1459 FORI=1TO13:READA,B,C,D 

1469 LINE(A,B)-(C、D),3:NEXT 

1479 LINE(89.48)-( 89,59) , 4 

1489 LINE(48.59)-(219、59) ,4 

1499 RETURN 

1599 REM カク (My FILE) 

1519 IFH<84THEN1579 

1529 LINE(H,52)-(J,52). つ JEH:RETURN 

1539 REM カク (テキ FILE) 

1549 IFK く <84THEN1660 

1559 LINE(K,56)-(M,56), 2:M=K:RETURN 

SD REM ケーー ム オー パー 

1579 FORI=1TO019 り 99:NEXT 

1589 LOCATE4.6:COLOR3 EPRINTTGAME _ OVER" E 
LAY "AEAEAFA" EGOTO229 

1599 REM オォ ト 

1699 PLAY"L4o1S15mS599 a“" 

1619 FORI=ITO59:NEXT ERETURN 

1629 REM カク (し べ ^ ル ) 

1639 LOCATE4.7:COLOR 3 は EPRINTTLEVEL "ILE 
ORI=1TO1999:NEXT 

1649 LOCATE4.7:COLOR 2E:PRINTTLEVEL TKLEER 
ETURN 

1659 REM カチ 

1669 FORI=1102099:NEXT 

1670 LE=LE+1:R=R-1:H=208: リ =HEK=HEM=HEA1= 
9:B1=19:X=1:X1=14 

1689 PLAY"OL8CAEAEDCAE4":1FLE=6THENI579 
1699 GOTO279 


* 。 人 M 串 


ジェッ トー / 之 みち ゃ ん トマ ト 〉 じい さん さん さい じ (じい さん 三 歳児 ) (埼玉 県 ・ 岩 本 圭介 フン ) 如 そ の な ば か な こと ある わけ な い だ ヒル / 
東 人 9 ろ つ つ 一 に 。 逆さ 言葉 と ウニ ウニ が 混ざっ て いる し 、 ご の 作品 、 読 ん だ こと た ん に 笑い ガ 出 まし た 。4.5 カ ラブ ラム 。* 


FPSWMWE 
まま EE 


ガ が つい に 出 志 ぞ / 


も う 、 ポ シェ ッ ト 愛 読者 に は な な じ 
み の グ ラム 航空 大 臣 の 最新 作 。 う 一 ん 、 
今回 の 作品 は 、 ま だ た ひと きわ いい ん で 
(nn が いい 。 は つき り い っ て ザイ コー 

スペ ー ス キー で ゲー ム ス タ ー ト 。 [IE 
_SC] キ ー を 押す と いき な り レ ベル 6 か 
ら は じ め る こと も で きる 1! 

カー ソル キー (まだ は ジョ イス ティ 
ッ ク ) て 前 後に 移動 し 、 ス ペー スキ ー 
(トリ ガー ボタ ン ) で 剣 を ひと 突き 。 
要する に フェ ン シ ン グ の 戦い な の だ 。 

お た が い の 剣 の 位置 に よっ て 、 ダ メ 
ー ジ の 有無 を キビ シク 判定 し て いる の 
て 1 仙 U て て くれ ば と ん だ ん ルフ まく だ っ 
て 〈 る 。 興和 准 し ちゃ う ね 。 

ひと り の 敵 と ひと し きり 戦っ て 、 相 
手 の パ ワー を 0 に し た ら 、 次 の レベ ル 


PWR 


eX 46K) 


記 】 邦 昌 樹 
2 ヵ月 に 1 回 、 し っ か り 投 


稿 し た ボク は アホ な 子 か ? 


合格 (高校 に ) し た ぜ ! ちな み に ぼ ぽく 
は 受験 地獄 最 中 2 ヵ月 に 1 回 し っ か 
り と 作品 を 送り つづ けた 、 と っ て 
も 良い (アホ な ) 子 で す 。 だ が 
受験 直前 に 出し た 前 作 は ボツ 。 
ボツ に な っ て 
は じ め て わ 
か る 採用 の 
カン ゲキ ! 
ころ で 、No 
1 の P15、 福田 の 
考え は 正しい ! 


QS の ざ 財 は は 
月 NM NM 月 用 月  M 間 朋 月 月 卓上 上 上 邊 


( ゞ 


| NN WW WI NM MI WM WNW M WM WI WI WW I WM 


FNEHRY POMER 
Sg 


| 

思 

い 

が 

け 

ず 

リ 

ア 

ル 

動 

き 

う へ 進む 。 レ ベル が 高い ほど 敵 が 強く な 
3 る の は も ちろ ん ! 自分 の パワ ー が 0 
ジ に な っ だ た ら 、 あ えな くく ゲー ム オ ー バ ー。 
7 9 に いく と 、 精 圭 ( 羽 
グ "の は えた だ キャラクタ) が 出 て き て 、 パ 
和 ワー を 最大 値 ま で 増やし て は げ ま し て 
オ くれ る 。 を その あと か ら 出 て くる 敵 は 、 
まだ さら に スピ ー ド アップ し て 〈 く る の 
ど 交 、 必 を ひき し め て いこ う ! 


レベ ルレ 3 、 も 


GOC 細 (TrWITWTTRTAM 


言葉 で は げ ま し て これ る だ け で な こ 、 バ ワー も 最大 値 ま で あげ て これ る の だ 。 


倫 、 く BLACK SWORD〉 フェ ン シ ン な ん だ ね 。 は じ め は 負け て ば つか り 。10 面 クリ アウ ご と に お 姫 様 に 会 える 。 こ ご こつ は 、 相 
(る 角 ) チ が 語 を 下 に し て いる 時 に エー イ と いく ぐ と 〇 みた だ い 。 ホ ント か ガ な や みん な だ めし て みて ネ / 


ああ 、 プ リン セス に 
実力 で 会 つて み だ い 


と どのくらい 練習 すれ ば 、 レ ベル 10 の 
の と ころ まで 行け る の か よく わか ら な 
い が (まだ 、 レ ベル 10 ま で 実力 で は 行 
っ て な い の だ 。 画面 写真 は ⑳ で 出し ま 
し た )、 レ ベル 10 を 征 芋 する と きれ いな 
プリ ン セ ス が 登場 し て 、 る る っ と キミ 
に か け よ り 、 甘 い に お いと 美しい メロ 
ディ ー の な か 、 キ ミ に だ け を っ と 、 
*I LOVE YOU 

な ん て いっ て て くれ ちゃ う 。 あ あ 、 を 
うか 、 ボ ク は この 言葉 に 出会う た め に 
人 まで 敵 と 洗っ て きた ん だ だ な の "な ん 
て 、 思 わ ず ス トー リー の な か に 感情 移 
和信 し て し まう エン デオ シク な が の だ っ だ 。 
や っ ぱし 、 大 臣 だ け の こと は ある な あ 。 


一 変数 リス ト BP…… パ ワー の 最大 値 
SP… 敵 の スピ ー ド 。 EP…… 敵 の パワ ー 
LV・FL…… レ ベル ・ W……STICK 入 力 判定 用 
CH…… 自 分 の キヤ ラフ ター ・ ST……STRIG 入 力 判定 用 
EC…… 敵 の キャ ラク ター 。 〇 …… 自 分 の 物 動 用 
A…… 自 分 の 座標 ・ EX-… 敵 の 物 動 用 

XX キヤ 敵 の 座標 


19 SCREEN 1,2.9:WIDTH 32:COLOR 15,1,1:KE 代 299 LOCATE18.8:PRINT 


Y OFF:CLS:STOP ON:DEFINT A-Z 

29 FORI=9TO8:READ W:W=Wx8:FORL=WTOW+7: RE 
AD D$:VPOKE L,VAL("&H"+D$) :NEXTL , 1 

39 FORI=9TO17:A$=" "FORL=1TO032:READ B も :A 
$=A$+CHR$(VAL("&H"+B$) ) :SPRITE$( 1 ) =A$ 

49 NEXTL,I:FORI=&H189TO&H2D7 : VPOKEI ,VPEE 
K(I)ORVPEEK( 1 )/2:NEXT 

59 VPOKE &H2909+14,15x16x1:VPOKE &H2099+ 
15,14x16+1:VPOKE &H2999+16.9xX16+1 

69 VPOKE &H2999+12,13xX16+1:VPOKE &H2090+ 
13.9x16+1:ON STOP GOSUB 449 

79 CLS:LOCATE19.3:PRINT "hipppppppPqd":LOCA 
TE19,4:PRINT "jkKxXxXXxXXy" 

89 LOCATE9,11:PRINT "WARRIOR "ELOCATE17,1 1 
・PRKINT "ENEMY" 

99 LOCATE13.2:PRINT "BLACK":LOCATE9.16:PR 
INT "SOUL":LOCATE14.16:PRINT"PRINCESS" 
199 LOCATE9.19:PRINT "HIT [SPC] KEY "ELOCA 
TE5,21:PRINT"(C) 1985 MASAKI SATOH" 

119 LOCATE13.5:PRINT "SWORD":PUTSPRTITE1 ,( 
86.62) ,15:PUTSPRITE4,(142.62) 7 

129 PUTSPRITE14,(83,.193),14:PUTSPRITE16, 
(142。193) ,14:SP=8:LV=1:FL=1:1$=INKEY$ 
139 IFI$=CHR$( 27 )THENSP=6:LV=6:FL=6ELSES 
T=STRIG(9)+STRIG(1):IFSTTHEN1 49ELSE1 29 
149 FORI=9TO16:PUTSPRITEI、(9.193):NEXT:A 
$= "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" 

159 FORI=9T022:LOCATE9 ,1:PRINT A や ENEXT:F 
ORI=14TO17:LOCATE2,I:PRINT SPC(28):NEXT 
169 FORI=2TO5:LOCATE19,I:PRINT SPC(12):N 
EXT:CH=1:EC=4:A=79:X=159:BP=49 

179 PWw=59:EP=59:LOCATE11.3:PRINT "hipPPPPP 
PP ":LOCATE11.4:PRINT "JJKXxXXXXXy" 

189 FORI=7TO11:LOCATE2, IT:PRINT SPC(13) EL 
OCATE17,I:PRINT SPC(13) :NEXT:GOSUB 530 


199 LOCATE3,8:PRINT "POWER:":LOCATE3.19:P 
RINT "LEVEL:"iFLILOCATE14.2:PRINT "BLACK“ 


穫 テ っ 
表 個 19 


4 逆 は な か お か 手ごわい が 、 


ムレ ベル 10 の 敵 を 倒す と プリ ン セ ス が し ず し ず と や つて き て ……。 


3 


キミ の う で さえ 確か な ら ……。 


まま お WU ま  P 和 8 得 ・・・ 


硬 プロ ブラ ハム の 説明 ・ 530 一 610 レベ ル ア ッ プ 
10 一 60 初期 設定 。 620 一 670 ゲー ム オ ー バ ー 処 理 
70-130 タイ トル -。 680 一 730 精霊 の 処理 
140 一 260 画面 設定 ・ 740 一 790 姫 の 処理 
270-360 自分 の 処理 ・ 800 一 820 VRAM デー タ 
370 一 440 敵 の 処理 ・ 830 ご 1000 スプ ライ ト デ ー タ 
450-520 刃 の 判定 


ENEMY_ POWER" :LOCATE 


| 14.5:PRINT "SWORD" 


219 IF LV=>6 THEN VPOKE &H2999+12.5%※16+] 
ELSE VPOKE &8H2999+12。13xX16+1 

229 FORI=9@TO16:PUTSPRITEI.(9.193):NEXT:L 

OCATE9,15:PRINTUSING"LEVEL 提 寺 START" jiFL 
239 C$="T255L5V1 404AR16AOS5DDDEFFG9A9G9A 1 
":D も ="T255L5V1204FR16FBBBOSCDDE9F9E9F1" 
249 E$="T255L5V1902AR16A03DDDEFFG9A9G9A 1 
":F$="O05GFEFEEECDDDD" 

259 G$= "05EDCDCCC04GBBBB":H$= "03EDCDCCCO 
2FBBBB":PLAYC$、D$,E$:PLAYF$,G$,HS 

269 FORI=9T09999:NEXT:LOCATE2.15:PRINT S 
PC に (20 ) 

279 ws=STICK(9)+STICK(1):IF W=4 OR W=S OR 
W=6 THEN CH=CH+ 1 ELSE 299 

289 IF CH=3 THEN CH=2 ELSE PUTSPRITE CH- 
1.(9.193):FORI=9TO59:NEXT 

299 IF W=1 OR Ww=2 OR W=8 THEN CH=CH-1 EL 
っ SE 319 

399 IF CH=-1 THEN CH=9 ELSE PUTSPRITE CH 
+1 ,(9,193):FORI=9TO59:NEXT 

319 C=(W=7)-(W=3):C=CX5:TF A+C= く 16 OR A+ 

C+16=>X OR A+C>299 THEN C=9 ELSE A=A+C 
329 PUTSPRITECH,(A,128) 15:ST=STRIG(9 )+5 

TRIG(1):IF ST THEN 339 ELSE 379 

339 PLAY"T255L6902V1 4S15M499C-":PUTSPRIT 

ECH。(9.193):PUTSPRITECH+6. (A+7,128).15 
349 PUTSPRITEEC,(9.193):PUTSPRITEEC+6. (XX 
ーー 29), 7 

359 IFA+29=>XANDA+8= く XTHENGOSUB459:FORI= 

9T0209:NEXTELSEFORI=9T0299:NEXT :GOTO369 


>(9.193):PUTSPRITEEC、(X。128) ./ 

379 PUTSPRITEEC+6,(9,193):R=RND(1)xSP:1F 
R=9 THEN EC=EC+ 1 ELSE 399 

389 IF EC=6 THEN EC=5 ELSE PUTSPRITEEC- 1 
>(9.193):GOTO 439 


〈《… み ちゃ ん トマ ト 〉 で ん き で は で きん で (電気 で は 、 で きん で ) (愛知 県 ・ ぼ つ かり 君 ) な まつ て ます ね エ 。 ご これ は 、3.5 う の 
カラ ブラ ム 。 き ん て ん ご か ら ぐ らむ で す 。 間 違え な いで ネ ! 半 


369 PUTSPRITECH,(A,128),15:PUTSPRITECH+6 [ 侍 


人 


次 


399 IF R=] THEN EC=EC-1 ELSE 419 

499 IF EC=2 THEN EC=3 ELSE PUTSPRITEEC+ 1 
(9.193):GOTO 436 

419 EX=(R=2)-(R=3) :EX=EXX5: 1F EX+X= く A+16 
THEN X=X+4 

429 IF R=4 AND A>16 AND A+29=>X AND A+8= 
く X THEN A=A-5:X=X-5 

439 1F X+EX=>224 THEN X=X-4:GOTO 279 ELS 
E X=X+EX:PUTSPRITE EC,(X,128) ,7:GOTO279 
449 SCREEN 9:WIDTH 49:COLOR 15,1,1:CLS:P 
RINT"GOOD LUCK! GOOD BYE!":END 
459 PLAY"T255L6908V14":IF CH=9 THEN 469 
ELSE IF CH=1 THEN 479 ELSE 489 

469 IF EC=3 THEN PLAY"CC-":RETURN ELSE 1 
F EC=4 THEN 499 ELSE 599 

479・IF EC=3 THEN 499 ELSE IF EC=4 THEN P 
LAY"CC- "ERETURN ELSE IF EC=5 THEN 599 
489 IF EC=3 THEN 599 ELSE IF EC=4 THEN 4 
99 ELSE PLAY "CC- "ERETURN 

499 PLAY"O07V14S5M899A" :PW=PW-5:PUTSPRITE 
CH+6,(A,128) ,8:GOSUB 539:RETURN 

S99 R=RND(1)X3:IF R=9 THEN X=X+6:PUTSPRI 
TEEC+6,(9,193):GOTO 519 ELSE 529 

S19 PUTSPRITE12.(X,128),7:FORI=9TO290 : NE 
XT:PUTSPRITE12.。(9,193) : RETURN 

S29 PLAY"O07V14S5M899C" :EP=EP-5:PUTSPRI TE 
EC+6,(X。128) ,8:GOSUB 539:RETURN 

539 IF EP= く 9 THEN FL=FL+1:LOCATE19,10:PR 
INT _ USING" 提 手 " 5FL:EP=45+LVx5 ELSE 609 

549 LV=LV+1:PUTSPRITE12,(X+6,128 ) ,7:PUTS 
PRITEEC+6、(9,193):FORI=9TO1999 

559 NEXT:PUTSPRITE12.(9.193):PUTSPRITE13 
>(X+6.128) 。7:PUTSPRITECH+6 , ( 9 , 193) 

S69 FORI=9TO4:PUTSPRITE17,(9,193):PUTSPR 
ITE15,(A+6.128),15:FORL=9TO599 : NEXT 
oO79 PUTSPRITE15,。(9,.193):PUTSPRTTE17, 
ぅ 128),.15:FORL=9TO599:NEXTL,I:X=150 
S89 PUTSPRITE17.(9.193):IF LV=11THEN LV= 
1:LOCATE19.19:PRINTUSING" 拉 "5 FLIGOTO740 
S599 IF LV=30RLV=60RLV=9 THEN SP=SP- 1 :GOT 

0689ELSEA=79:CH=1:EC=4:GOSUB6109:GOTO299 

699 IF PW= く < THEN PLAY"S5M4999A1":FORI=g 

TO2599:NEXT:GOTO 629 


(A+6 


619 LOCATE19.8:PRINT _ USING"##%" 5 PW:LOCAT 
E22.19:PRINT _ USING" 持 %"KEP : RETURN 
629 FORI=9TO11:PUTSPRITEI.(9.193):NEXT:F 


OR1=6TO21:LOCATE9 , IT:PRINT A$:NEXT 
639 LOCATE19.9:PRINT" GAME OVER ":LOCATE 
7。14:PRINT" YOUR LEVEL 1S" FL 
649 PLAY"T25S5L5V1503S3M7999DDDDDDDDDDDDD 
DDDED4R64D3DDDED4R64D3DDDFE4R64E3EEEF3" 
650 PLAY ESD6E3DSE3DSCSD3CS02B303E3DSC5D 
3CSD3C502F-3A2" 
669 FORI=9T012599:NEXT:LOCATE8,19:PRINT" 
委 ル SPOT KEN." 
679 ST=STRIG(9)+STRIG( 1 ) : 
LSE 679 
689 FORI=9TO16:PUTSPRITEI 、(9.193) :NEXT:F 
ORI=ATO15STEP-4:PUTSPRITE1,(I,128) 、15 
699 FORL=9TOS9:NEXT L,I:FORI=234TO28STEP 
-1:PUTSPRITE14。(T.118),14:FORL=9TO25 
799 NEXTL,IEPUTSPRITE1 ,(9.193):PUTSPRITE 
IS.(15.128).189)PUTIOPRITDI4、(28 1267。14 
719 FORI=PWTOBPE:BEEP:PW=PW+ 1 :GOSUB610:NE 
XT:A=79:LOCATE19.15:PRINT" 電 GOOD LUCK!@ 
729 PLAY"04V14T255L4CDEF2GFED2EFGEFGFECC 
っ っ 04V14T255L4R64CDEF2GFED2EFGEFGFECC" 
739 FORI=9T09999:NEXT:LOCATE2.15:PRINT 5S 
PC(28):CH=1:EC=4:GOTO 216 
749 FORI=9TO16:PUTSPRITEI,(9.193):NEXT:F 
ORL EATO019STEP-4 :PUTSPREITE1 (IT。128) 15 
7S59 FORL=9TO59:NEXT L,T:FORI =234TO032STEP 
-1:PUTSPRITE16,(I,128).14:FORL=9TO26 


IE SI THEN 50 皮 


タ の ひ 


769 NEXTL,I:PUTSPRITE1 .(9,193) :PUTSPRITE 
15.(19.128)。15:LOCATE4 .15:PRINT"@" 

779 LOCATE19.15:PRINT"@1 LOVE YOU・・・@" EE 

P=59:A=79:X=159:SP=8:BP=BP- 1 9 : PW=BP+ 1 

789 PLAY"T255L404V1 4GABAGGGFCDEFAGF " , "T2 

S5L404V13R6GABAGGGFCDEFAGF " :GOSUB 619 

799 FORI=9TO12999:NEXT:LOCATE4 ,15:PRINT" 
LOCATE2.15:PRINT SPC(28) :GOTO209 

899 DATA97,99,7E,7E,7E,99、E7,E7 ,E7 ,194.9 

9,99.99,99.99,36,F6,B6,195,.1F,9E,96,096,0 

7。D7、D7 。D7 

819 DATA196,AD,ED,2D,99,99.99,99,99,197, 

B7,B7,B7,97,96.96.9E,1F,112.99,99,99,099, 

99,FF,FF ,FF 

829 DATA113,.99.99,99,99,99,C9@,F8,FF, 1208 , 

FF、FF,FF,99.99,99.99,99,121 ,FF,F8.C9, 099, 

90,.99,99,099 

839 DATA99,99、91.91.91.92.96,19,22,93,91 
92.96,98,19,38.99,99,89,89,93.8C,B9,C9, 

29 89.89.89,49,89,E9、99 

849 DATA99,99,91,.91.91.92,.96,.99,12,93,.91 
93,96.98,19.38,.99.99.89,89.99.89,A9,FF, 

29、89,49.E9 ,39,20,49,79 

8659 DATA99,99,99.99,99,91 ,93,94,99,99,.01 
ぅ 93,96,98、19.38,99.99,C9,C9,89,49,49,D9, 

39 CC。43.E9 、39 ,20 ,49,69 

869 DATA99,99,91.91.C9.31.9D,93,94.91,91 
ぅ 91.92.01.97,99,99,99.89,89,89,49,69,98。, 

44,C9,89,49,.69.19.98,1C 

979 DATA99,99,91,91.99,91.95,FF,94,91.,92 
>97,9C,94.92.9E,99,99,89,89,89,49,69,99, 

48,C9.89.C9.69,19,.98,1C 

8689 DATA99.99.93.93.91.92.92.9B,9C、33,C2 
97 9C、94.92.9E,99,99,99,99,99.89,C9,29, 

99,99.89,C9,69,19,98,1C 

899 DATA99,99,96,96,84.6A,1A,97,98,9E,96 
ぅ 9B,19,21 49,E9,99,.99,99,96,18,69,89,09, 

99 09,99.99.89,99,89,E9 

399 DATA99,99,99,99,39,9D,93,99,99,99,91 
93,96,.9C。19、38,.99,99,C9,C9,89,49,59,FF, 
19,C9,49,E9,39,29,.19,1C 

919 DATA99,99,99,99.99,99,99,91,3D,92,92 
97 9C。39 ,C9,E9 ,99.99,99,99,99,C9,C9.99, 

49,B9,8C,C3.69,29,49,79 

929 DATA99,99,99,69,18,96,91,99,99,99,099 
99.91.99、91.97,99,99.69,69,21,56,58,E9, 
19,79.69,.D9,98,.84,.92,07 

9339 DATA99,99,93,.93,91,92.9A,FF,98,93,092 
・97/.9C,94.98.38.99,99,099,90,9C,B9 ,C9 , 99 、 

89,99.89,C9,69,39,98,1C 

949 DATA90,099,99.99,99,93,93.99,92,9D,31 
>C3.96,94.92.9E,99、99,99.99.99,.99,99、80, 

BC, 49.49,E9,39,.9C,93,97 

959 DATA99,29,.29、19,.19.98.99.96,91,91,93 
>93.96.9D,18.39.99,99.99,C9,C9 ,49,69,98, 

C4.49.89,.99.99,.99、89,CMg 

969 DATA99,99,99.90,99,99.99,99,99,099,99 
>99.99.81.8E,FD,99.99.99.99.99,909.,99,09, 

99,99.99,99,99,E3,17,FB 

979 DATA99,99.91.91,99.91,.91、93,.96,19.,91 
93,.92.93.96,9F,99,99.89.89,99,B8,7C,6C, 

C4.89.89.C9.C9,E9.F8,7F 

989 DATA99,99,.99,99,99,99,93,.9C,。19,38,.19 
>19,.19,11.12、17,.99,99.69.69,49、A0,99,E8, 

C4.A3.69,69.C9,49.49,79 

999 DATA99,99.91,.91,99.91,.91.93.96,19,91 
>93.93.97,95.9F,99,99.89.89,89,89,49, 40。 

99.89.89、C9,C9,E9 , B9 ,FC 
DATA99.94.94.92.92.91、91.99,19,38,1 
9.11.11.12.12、17.94,.94.68.68,59,99,A9,E9 
0 2 E9,69,49,49,49,79 


〈《⑰ み ちゃ ん トマ ト 〉 お ら も ぐるみ と みる ぐも ら お (お あら も 、 ク ルミ と ミル フク 、 も ら お ) (新潟 県 ・SーF.AmKIl) 盆 田 


穫 テ ッ ビ 
更 桂 ら し さ が ザ あ ら わ れ て いて 、 ほ の ぼ の と し て いる 。 ご これ は 、 お みごと 作品 。5 カ ラグ ラム 。 女 
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に 掲載 され た の で と っ て も 
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一 変数 り リスト 


詩 挙 ろ 久 み タタ イム 7 分 


4 フ ニ ョ フ ニ ョ の ChHim 


の 


(ve で の い 


ラル クマ 

円 クン で 採用 し た だ ! 上 ョ 

上 、 わ ムン や 

クル クル 回 転 する 5 円 クン が か わい 人 王 に 了 り 
の N 

い 。 と に か く ス ペー スキ ー で ゲー ム ス 5 


トド し て みて) 

Chim は フ ニ ョ フ ニ ョ の キャ ラ 
て 、 こ の 二名 カ ー ソ ルキ ー 
て 動か し て 10 円 ダマ を 右 下 に あ 
る ガマ グチ まで は こぶ ゲー ム が , 
100 幅 た まる と 、 面 クリ ア で て 、 次 
の 面 へ 。。 シッ キー だ な 面 も チン シラ 
ッ キ ー な 面 が ある ぞ 。 

クル クル 5 円 クン に 注意 。 な 
ん た だ か か わい いけ と 、 こ いつ に あたっ 
だ ら 、Chim が ひと り へ っ ちゃ う 。 3 人 
と も いな く な る と ゲー ム オ ー バ ー 。 リ 


ま 
8 


H 
6 
NH 


し 4 


ロ 
に 


HH 
時 


me 。 gy 
に っ 間 ゴ Mr 


FR 
EE: 

上 

中 


GT 


プレ イ は スペ ー ス キー。 
うま く 〈 5 円 クン を 閉じ こめ て し まう 
の が この ゲー ム の ユ ツ み だ い だ よさ 。 


XY……Chim の 座標 
PO……5 円 Kun の 座標 
XX.YY……ChIm の 移動 
PP.OO 5 円 Kun の 秘 動 
M1…… Chim の 変形 
M2……5 円 Kun の 変形 


FINTA-Z:A=RND( -TIME ) 

29 PLAY"T299L6V1505" 

39 FORA=9TO04:B$="":FORB=9TO7 : READA$: B$=B 

$+CHR$( VAL("&H"+A$) ) : NEXTB:SPRITE$(A) =B$ 

・NEXTA 

49 FORA=9TO3: READA$: FORB=9TO7 : READB$: VPO 

KEVAL("&H"+A$)x8+B,VAL("&H"+B$) :NEXTB,A 

59 VPOKE&H291 1 , &HA1 :VPOKE&H2012。&H4 1 : VPO 

KE&H2913,&H81:VPOKE&H291C,&HD1 

69 GOTO396 

79 CLS:SC=9:MA=3:FORA=2TOMA : LOCATE29-A, 1 

9:PRINT" ね "ENEXTA:LOCATE22-MA , 19:PRINT "LE 

FT" ・ 

89 FORA=3TO18:FORB=3TO028 : LOCATEB , A: PRINT 

" あ ":NEXTB,A:FORA=4TO17:FORB=4TO025STEPI NT 

(RND( 1 ) *2+ 1 ) :LOCATEB ,A: IFRND( 1 ) > . 3THENPR 

I NT 1 6 

99 NEXTB,A 

199 FORA=1TO29:LOCATERND( 1 ) *23+4 ,RND( 1 ) 

13+4:PRINT" く < く ":NEXTA 

119 X=5:Y=5:P=25:Q=15:LOCATEX,Y:PRINT" 
"iLOCATEP-1.Q:PRINT" "LOCATE1 7,17: 

PRINTSPC( 19):"":LOCATE18.2:PRINTUSING"S 

CORE 蘭 基 円 " SC:LOCATE3,2:PRINTUSING"Hi-S 

COYTG 募 六 章 幕 円 " : HG 

129 ST=STICK(9) :IFST く >9THENM1 =M1 + 1 

139 XX=(ST=60RST=70RST=8 ) - ( ST=20RST = 30RS 

T=4 ) :YY=(ST=80RST = 1 0RST = 2 ) - (ST=40RST=50R 

ST=6):X=X+XX:Y=Y+YY 


江 テ ッッ 
家人 右 ! あ 


899+X+XX+(Y+YY )x32 ) 

159 IFV1 く >32THENX=X-XX:Y=Y-YY 

169 IFV1=&H98 AND V2=32THENX=X+XX:Y=Y+YY 
・LOCATEX.Y:PRINT" ":LOCATEX+XX,Y+YY:PRIN 
で LU 

179 IFV1=&H98 AND V2=&HE9THENX=X+XX: Y=Y+ 
YY:LOCATEX,Y:PRINT" ":SC=SC+19:PLAY"DA": 
LOCATE18,2:PRINTUSING"SCORE 枯草 著 円 ":SC:IF 
SCMOD199=9THENPLAY "DRERFRBRAFEFEFEDCEABA 
FD" :GOTO089 

189 IFPP=9@THENIFX く PTHENPP= - 1 ELSEPP= 1 

199 P=P+PP:1IFVPEEK( &H1899+P+Qx32) く >32THE 
NP=P-PP: PP=9 

299 IFQQ=9THENIFY く <QTHENQQ= - 1 ELSEQQ= 1 

219 Q=Q+QQ:IFVPEEK( &H1899+P+Qx32) く >32THE 
NQ=Q-QQ: QQ=9 

229 PUTSPRITE1.(Xx8、Yx8) ,15、M1IMOD2 

239 M2=M2+1:PUTSPRITE2,(Px8,.Qx8) ,19.ABS( 
2-M2MOD4 )+2 

249 ONSPRITEGOSUB279 

259 SPRITEON 

269 GOTO129 

279 SPRITEOFF :MA=MA- 1 : PLAY "ARBEREDC" : IFM 
A く =9THENPLAY "BBBAAFFEEEDDCCCDDDCCCC" : LOC 
ATE11.19:PRINT" GAME OVER ":GOTO299 

289 LOCATE28-MA,19:PRINT" ":RETURN89 

299 IFINKEY も =" "THENCLSELSE299 

399 LOCATE8,2:PRINT" あぁ あぁ ち あぁ ぁ ぁ あぁ あぁ 
LOCATE8 .3:PRINT" ぁ ぁ あぁ あぁ あぁ ぁ ぁ ぁ ぁ あ ":LOCA 
TE8.4:PRINT" ぁ あぁ ああ ぁ あぁ ぁ あぁ":LOCATE8 , 
5:PRINT" ぁ ぁ あぁ あぁ ぁ ぁ あぁ ":LOCATE8.6:PR 
INT" ぁ あああ あぁ ぁ あぁ あぁ ぁ " 


HS…… ハ イ ・ ス コア 8 kun の 変形 。230 5 円 kun の 表示 
MA……Chim の 数 。 回 プロ ブラ ム の 説明 ・ 240 一 250 Chim と 5 円 kun が 重 な つ だ 
V1……Chim の 行こ 場 所 の キャ ラフ マタ ・。 10-- 50 初期 設定 ・ の どう か 
コー ド ・ 60 オー プ ニ ン ノ 画 面 へ 飛ぶ  。260 120 へ も どる 
V2……:Chim の お し て いる 10 円 dama ・ 70 一 110 画面 表示 ・ 270 一 280 Chim が ガー 人 死ぬ 
の 行こ 場所 の キャ ラフ ター コー  。 120 一 170 Chim の 移動 ・290 リプ レイ 処理 _ 
軸 ・ 180210 5 円 Kun の 物 動 。300-370 オー プ ニ ン グ 画 面 の 表示 
MM…… オ ー プ ニン グ 時 の Chim や 5 円 220 Ohim の 表示 380 一 400 キャ ラフ ター の デー タマ 


319 LOCATE19,19:PRINT "ーー Chim":LOCATE1 
2.12:PRINT "ーー 5 円 kun":LOCATE8., 14:PRINT 
19 円 dama":LOCATE9.16:PRINT" 一 
GamaGuchi":LOCATE8 ,、18:PRINT" ぁ 
Renga" 

329 LOCATE7 , 29:PRINT"PUSH [SPACE] KEY !! 


KG 


339 IFHS<SCTHENHS=SC 

349 A$= "CDCDCDCDCECECEDFDFEAEAEAFABABBBF 
D" 

359 FORMM= 1TO039 : PUTSPRITE1 ,(64.89) ,15,MM 
MOD2 : PUTSPRITE2 , ( 72, 96 ) , 19, ABS( 2-MMMOD4 ) 
+2 
369 
379 
389 
399 
499 
419 
429 
439 
449 
459 
469 


M$=MID$(A$,MM,1) :PLAY"XM も :" 
IFINKEY$=" "THEN79ELSENEXTMM: GOT0359 
DATA 3C,7F,FF,DB,DB,DB,FE,89 
DATA 78.FE,FF,DB,DB,DB, 7F. 99 
DATA 3C,7E,FF,E7,E7,FF, 7E,3C 
DATA 18,3C,7E,76.76.7E,3C,18 
DATA 18,18、18.18.18,18,18,18 
DATA 91.99,DF,DF,DF,99.FB,FB,FB 
DATA 98,3C,7E,A1.,AD,AD,A1,7E,3C 
DATA E9,C3,E7 ,C3.3C,FF,FF,FF,7E 
DATA E8,3C,7E,FF.,DB.DB.,DB,66,99 


〈… み ちゃ ん トマ ト 〉 ガ ば さん お いら らい お ん さば か (カバ さん 、 お いら ライ オン さ 、 バ カ / ) (神奈 川 県 ・88mKIl SR) 
広 カ バ と ライ オン の 会 話 。 う ー ん 、 な ん ガ か わい い 画 囲 気 だ ガ けら 、3 カ ラグ ラム 。 立 


ピタ 


OO 


mm ちゃ あん と 壁 を お ぼ 
に られ る みか なー 

を の 名 の と お り 、 こ の ゲー ム は 床や 
壁 が プラ ッ ク に な っ て し まう ヒヤ ヒヤ 
ゲーム な の だ 。 

スペ ー ス キー (また は トリ ガー ボタ 
ン ) て ゲー ムスメ 
ー ト 。 黄色 い マ ロ 
くん を 動か し て 、 
青い アク マ に つか 
まま 、 の カ 
ギ を と っ て 右上 の 


ェ 了 ー ら どり EE ココ 上 


に け は だ E] ュ da が 


トー 
2 
2] 


24 


。 沿 
ooooooomsoooeoGooCo0 の omoosreo ら Soo0020C022 の 00 


。OST は VQ 評 皿 お 旋 せ JJ 人 


お うち に 帰る の が 目的 。 で も 、 如 は す 
ぐに 黒く な っ て 見 えな く な っ て し まう 
の だ 。 た だ た だ し 、 ロ ー ソ ク を と る と 一 定 
時 間 だ け 壁 が 見 える よう に な る ぞ 。 
壁 の 状態 し と か あな の 位置 な ど し っ か 
りお ば えて 、 進 ん て いこ う 。 カギ を と 
ら な いと 、 お うち の ドア は あか な い の 
て 注意 。 


。 ざ ハロ |] びび) 
さり は ざす 人 


IS 


人 j さ い 


レ 
そ 
に: 
すず る 
る マツ 
。 アロ 
※ マツ ん 
ら 1 < を 
ん ジ 
| 【o】 
。 


| 


4 L 
5 和 
1 人 木 英 明 
『m そん な わけ で 、 今 は タン ス 『 
『 に MSX を 入れ て いま す 。 1 
ゴ 界 勉 や 今 な と 
L 淫 "て バ に と 
L じ パ い イ 担う 邊 
3 る ソ る ト 任 中 
“ ます 
( 和 省 ン で 

と 問 半 1 
上 の ) の 具 5 
上 | 頃 体 イ 生生 ュ 

「 で に ト ご て 

1 、。 。 


昌 I 本 MI IM IM 』 BI IM M MM IM IM MI - 


面 は 全部 で 10 面 ある 。 は じ め は 、 わ 
と カン グン が ん だ けり と 、 や っ て そい る 
うち に 落と し 究 と か ジャ マ な 壁 と か い 


いろ あっ て 、 よ く 《 考 えな い ょ クリア 
CC き NNE 


19 "xx BLACKWALL BY SUZUKI ※※% 
29 COLOR 15,1.1:SCREEN1 , 2.1:WIDTH32:KEYO 
FF:DEFINTA-Z:KEY1 , "WIDTH29"+CHR$(13):A=R 


39 DEFFNA( X,Y ) =VPEEK(6144+X+Yx32):DIM V$ 


69 PLAY"06L19V12CBDGEDCAGDEFCEGCEDC" , "06 
L19V1 2CDECDEDCEDCDECDEDCE" 


89 MO=9:MC=9:X=4:Y=18:FORI=1TO3:X(1)=RND 


レ 
そ 落 
うち ぢ 
コ な る 
1 マ こ 
5 [し] き 
くも 
ん う 
画 変 束 リス ト ・ 560 一 620 キャ ラフ ター 定義 し れ 
X. ヤ …… マ ロ 君 の 座標 ・630770 面 設定 
XX 一 3).Y0 一 99…… アマ 君 の 座標 s 780--880 キャ ヤラ フク ター デー 
M…… マ ロ 君 の の こり の 数 ・890 一 990 画面 デー マ 
ME…… 面 数 ・1 面 900 6 面 950 
S…… ス コア 。2 面 910 7 面 960 
有紀 と 9 イッ テス ・3 面 920 8 面 970 
MO で ロー ツン と つ だ か どう みか ・ 4 面 930 9 面 980 
MT…… ロ ー ソ フ の 時 間 。5 面 940 10 面 990 
DX( ナ …… アマ 君 の 動 ご 方 向 。 較 チェ エッ ン フ ポイ ント 
MC…… マロ 君 の キヤ ラフ ター の 向き <・ 40 行 の M=2 を か える と 、 マ ロ 君 の 数 が か 
MAS…… 壁 の 点滅 。 わり ます 。 面 を ひみ え だ い と き は 、40 行 の 
VX.VT ーー ハシ ゴ 、 カ キ ギ の 崖 禁 ・ ME を 好き な 面 に し て か ら 、650 行 を | ビ 
VU.VW…… ロ ー ソ の 座標 。 ME (好き な 面 ) THEN RESTO ND( -TIME ) 
還 プ ロブ ラム の 説明 。 RE (好き な 面 の 行 敷 ) と し て 下さ い 。 壁 
10 一 110 初期 設定 ・ を 見 える よう に し だ けれ ば 90 行 を FOR (59) :GOSUBS79:GOTO 419 
120-230 メイ ン リ スト ・ |ー1 TO9 に し て 下さ い て だ だ し 、 ロ ー 4 S=9:M=2:ME=1 
240-330 マロ 君 の 動き 2 ソフ を と る と こと 、 し ば ら こ し て 消え ちゃ う )。 5 GOSUB640 
340-370 死ん だ か 、 家 に 入 つ だ か 判定 ・ ( よ つ ち ゃ ん ) 
380 一 400 ゲー ム オ ー バ ー 処 理 ・ 79 IFPLAY(9) く >9 THEN 79 
410-500 スタ ー ト 画面 . 8 
510-550 全面 クリ ア ・ 


(1)x22+4:Y(I)=4XI+2:DX(T)=1:NEXT:MA$= "89 


(BLACK WALL〉 お も し ろ い ね 。 最初 の 点滅 する と き に 道 を よー ご < 覚え て お こう 。 忘 れ ち ゃ つ だ ら 、 ろ ー そ こく を と つて 
道 を よー ご ぐ 見 よう ね 。 自分 の キヤ ラ を 、 は し ご の 上 で キヨ ロキ ヨロ させ て ご らん 。 か が わい いと 思わ な いや 


99 FOR =1 TO 19:VPOKE BASE(6)+12,VAL("& 

H"+MA$ ) 

199 IF MA$="89" THEN MA$= "11" ELSE MA$=" 

89" 

119 FORJ=9TO0259 NEXT : NEXT 

129 '%X% MAIN LIST 

139 ON SPRITE GOSUB 359:SPRITEON 

149 PUT SPRITE 9,(Xx8,Yx8-1 ),19.MC:FORI = 

1T03:PUTSPRITEI,(X(I)x8.Y(I)x8-1),.4.3:NE 

XT 

159 IF FNA(X,Y+2 ) =32ANDFNA(X+ 1 ,Y+2 ) =32TH 

EN GOSUB 259 

169 IF FNA(X,Y+2)=112 THEN PLAY"L6406V19 

G" iLOCATEX,Y+2:PRINT" "LOCATEX,Y+3:PRIN 

T" "iPUTSPRITE4 ,(9.299):GOSUB 259:VPOKE 

BASE(6)+12.VAL("&H"+ "89"):MO=1:MT=199:S= 

S+199:GOSUB769 

179 IF MO=1 THEN MT=MT-1:IFMT=9THEN VPOK 

E BASE(6)+12.VAL("&H"+"11"):MO=9 

189 IF FNA(X,Y)=129 THEN PLAY"L6406V19EC 

"LOCATEX。Y:PRINT" "ELOCATEX,Y+1:PRINT" 

"LOCATE24、2:PRINT" "ELOCATE24.3:PRINT" 
":S=S+199:GOSUB769 

199 IF FNA(X,Y+2)=129 THEN PLAY"L6406V19 

EC":LOCATEX.Y+2:PRINT" ":LOCATEX 。Y+3: PRI 

NT" "iLOCATE24.2E:PRINT" "ELOCATE24.3:PR 

INT" "iiS=S+199:GOSUB760 

209 ON STICK(Q) GOTO 269,339 , 289 , 339 ,399 

339 , 320 ,330 

219 FORI=1TO3:IFX(T)=26THENDX( T)=-1ELSEI 

FX( 1 )=4THENDX( 1 ) =1 

229 NEXT:FORI=1TO3:X(I)=X( 1T)+DX( T ) :NEXT 

239 GOTO 149 

249 '"%※% MARO UGOKI  ※% 

259 Y=Y+]1 :PUTSPRITE9 (XX8,Yx8) ,19,9:MC=9 

・RETURN 

269 MC=9:IF FNA(X,Y+1 )=194ANDFNA( X,Y-1 ) く < 

>97 THEN Y=Y-1 

279 GOTO 219 

289 MC=1:IF FNA(X+2.Y) く >97ANDFNA( X+2 、Y+1 

) く >97THEN X=X+ 1 

299 GOTO 219 

399 MC=9:IF FNA(X,Y+1 ) =194ANDFNA( X 、Y+2 ) く 

>97 OR FNA(X,Y+2)=194THEN Y=Y+1 

319 GOTO 219 

329 MC=2:IF FNA(X-1.,Y) く >97ANDFNA(X- 1 ,Y+1 

) く >97THEN X=X- 1 

339 GOTO 219 

5 と 9/ 還 還 た て そそ そそ そそ エエ テテ エナ キ テテ ナメ エエ エナ テ ズ コ ] 

359 SPRITEOFF:FORI=1TO3:PUTSPRITEI ,(9,.20 

9 ) : NEXT 

369 IFY=2THEN ME=ME+ 1 :PLAY "L6406V19BCGA" 

:S=S+199xME:PUTSPRITE9,(9.299):GOTO 5 

379 M=M-1:IF M=-1 THEN 399 ELSEGOSUB769: 

GOTO 69 

389 '%X%X GAME OVER ※% 

399 LOCATE11.11:PRINT "< く GAME OVER>" PLAY" 

L2702V12CDEFGABO03C02BAGFEDCRCRCRC" 

499 FORI=9TO15999:NEXT:IFHS く STHEN HS=S 

419 "xx START GAMEN ※%※ 

429 CLS:VPOKEBASE(6)+12.VAL("&H"+ "89"):F 

ORI=9TO5:PUTSPRITEI ,(9.299):NEXT 

439 LOCATE6,4:PRINT"aaa a a aaa 24 4 

"iLOCATE6.5:PRINT"a a a a a a 

449 LOCATE6.6:PRINT"aaaa a a 2 4 a4 

":LOCATE6.7:PRINT"a aa aaa a 

459 LOCATE6,.8:PRINT"aaaa aaa a a aaa a a 

":LOCATE8,19:PRINT"a a a a a a" 

469 LOCATE8.11:PRINT"a aa aa 

CATE8,12:PRINT"a a aaaa a" 

479 LOCATE8,13:PRINT"a a a aaa a a":LO 

CATE9,14:PRINT"a a aa aaa aaa" 

489 LOCATE11.19:PRINT"BY H.SUZUKI" :LOCAT 

E19.21:PRINT "HIT SPACE KEY" 

499 FORQ=9TO2:IFSTRIG(Q)THENCLS:GOTO 49 

ELSE NEXT 

599 GOTO 499 

519 CLS:FORI=9TO5:PUTSPRITEI 。(9、299) :NEX 

T:LOCATE9,8:PRINT " あな な は に ん けん し ゃ な い " 

529 LOCATE7 , 16:PRINT "つく りな さい ・・ ショ ウタ トン て ~ す 

"> LOCATE7 、19:PRINT "そう きみ は ケシ サトシ ~ も し た ~" 

S539 LOCATE8 , 12:PRINT "0 ひと の つく っ を サト ー ム は っ か り ": し 

OCATE7 , 14:PRINT "や っ て な いて ~ た ま に は し "ふん て で ~" 

549 LOCATE11,19:PRINT "HAPPEY END":PLAY"V 

1206L5CDERCDERGEDCDEDRCDERCDERGEDCDECL6 4 

BCBCBCBC" 

559 FORI=9TO15999:NEXT :ME=1:M=M+ 1:CLS:GO 

TO 5 

569 'xx CHARACTER TEIGI ※※% 

579 FOR I=9 TO 5:A$="":FOR J=9 TO 31:REA 

D B$ 


a":LO 


に り 


589 A$=A$+CHR$(VAL("&H"+B$ ) ) : NEXT : SPRITE 
$(T)=A$:NEXT 

599 FOR Il=1 TO 7:READ A:FORJ=Ax8 TO Ax8+ 
7・READB$ 

699 VPOKE り ,VAP("&H"+B$):NEXT 

619 READ A$::VPOKE BASE(6)+A/8,VAL("&H"+ 
A$) : NEXT 

629 RETURN 

639 '※x MEN SETTEI xx 

649 IF ME=11 THEN 519 

659 IF ME=1 THEN RESTORE999 

669 FOR 1I=2 TO 2 STEP2:READ V$ 

679 A$=BIN$(VAL("&H"+" 1"+V$) ) 

689 FOR DI=9 TO 1:LOCATE2,I+DI:PRINT "aa" 
・FOR J=2 TO 16:B$=MID$(A$,J, 1 ) :LOCATEJx2 
> エ +DI 

690 IF B$="1" THEN PRINT "aa": ELSE PRINT 
799 NEXT:LOCATE28 ,I+DI:PRINT "aa":NEXT : NE 
XT 

719 READ VA:FORI=1TOVA:READ VX,VY 

729 FORJ=VYTOVY+3:LOCATEVX ,J:PRINT "hi ":N 
EXT:NEXT :READ VU、VWw 

739 LOCATEVU,VW:PRINT "p":LOCATEVU ,VW+ 1 :P 
RINT"q":PUTSPRITE4 ,(VUx8,VWx8-1 ),15 

749 PUT SPRITE 5,(298.15) ,8:READVX , VY:LO 
CATEVX,VY:PRINT"x":LOCATEVX ,VY+1:PRINT"y 


759 LOCATE2.9:PRINT" [HI -SCORE] [SCORE] [ 
MAN] [MEN]" 

769 LOCATE2 ,1:PRINT HS:LOCATE 13,1:PRINT 
S:LOCATE 22。1:PRINT M 

779 LOCATE28 ,1:PRINT ME:RETURN 

789 "xx CHARACTER DATA \% 

799 DATA 99,37,5F,B1.A9.69,69,69,FF,E9,F 
り .B9,B8,1F,27,F9,9F,E8.F8.8D,95,97,97,97 
>FE,96,9C,9C,1C,F8,E4,9F 

899 DATA 91.96,1D,.3F,3F,6D,75,79.7D,7D,7 
D,3F , 3F 、BF , 47 29.89.69,78.C4,A4,A6,A6,A6 
>FE,92.82.84.C4,FD,E2,94 

819 DATA 91,96,1E,23.25,65,65,65,7F,49,4 
1,21.23,.BF ,47,29.E9,E9,F8,FC,FC, B6 , AE, 9E 
BE,BE,BE,FC,FC,FD,E2.,94 

829 DATA 19,17,1F,37,3B,7D,7D,7F,FF,E4,F 
4.B9,B8,1F,27,F9,98,E8.F8,ED,DD, BF , BF , FF 
FE,26,.2E,9C、1C,FD,E2.04 

839 DATA 99,99.99,99.99,78.78,.78.78,78,7 

68,78.78,.78.78.99,99.99,99.99.99,99,99,99 
>99.99.99、99,99,99.99,99 

849 DATA 91,93,.97,9F,1F,3F,7F,FF ,29,2F, 2 
6.28,28,2F,29,2F,8C,CC,EC,FC,FC,FC,FE,FF 
94.84.84.B4.B4.B4.34,FC 

859 DATA 97,FF,C3.A5.99.99,.A5,C3,FF, 89,1 

94.C9,C9,C9.FF,FF,C9,C9,C9,F9 

869 DATA 195.93,93.93,FF,FF,93.93,93,F9, 
112.19,.39,.78,78,39.99.99.099,89 

879 DATA 113,.99.99.99,99,92.95,85,FF, 80, 
129,19,1F,19,19.1F、19.19,19,A9 

889 DATA 121,19,38.44.82.82.82.44.38,A9 

899 "%Xx GAMEN DATA 

999 DATA 992,FBF ,999,DFD,994.EB7,999,BF7 
999。FFF。7,14.4.8.8,24.8,14.12.26,12.,6,1 

6.29,16.29,12.4,19 

919 DATA 982,BBF,989,DFA,929,6FD,998.F6D 
>999。FFF,9.6,4,14,4.8.8.22.8.26,.8.4,12,2 

4.12.12.16.24。16,.19,12,.4,2 

929 DATA 992,BFF,999,7F6.999,DFE,994,8FD 
>999,FFF,6.6,.4、29.8,26.12.24.16,.6,16,19, 
16,.26.8,4,19 

939 DATA 992.997,.979,77D,.999,DB8,992,999 
999,FFF,19.29,4.12.8.24.8.24.19.19,14,1 

9.16.18.14.18.16.26.14.26.16.14.12.6,.16 

949 DATA 992,.76B,499,7D7,219.7BE,488,DDD 
999,FFF,11.4.4.4.8.4,12.22.4.16,.8,26,12 

s8。16,16,16.24.16.12.4.29.8,18.4.6,19 

950 DATA 992,7FF,999,BBE,999,DF7 ,999 ,BFE 

999。FFF,5,4.4.6,.8.14.8.8,12.26,16,6,16, 

22.19 

969 DATA 992,7FF,999,EA6 ,229,7F5,994 ,AFE 

:999。FFF,8,4。4,.19.8,18.8.26,.8.4.12.24,12 

19.16.26.16,.29,12,.24,6 

979 DATA 992,7DB,298,AEA, 222 ,7BE, 999, 83E 

3C9。FFF,8,4.4.6.8,4,12.6.16.22.4.22.8,2 

6.8.26,16,14,12.16,.18 

989 DATA 992.993,189,499,999.999.96B,9099 

999.FFF,12.8.2.8.6.8,12.8.16,14.6.14,19 

xs14.16.18,4.18.8.18.12.18,16.22.4.4.8,26 

2 

999 DATA 992,7DB,498.5EC,444.6D6,459,75F 

ぅ 999,FFF,7,4。4.4.8.4,12.4.16.22.4,24,8,2 

6.12.19。12.16,14 
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本 ジェ ッ ト 4 ゆみ ちゃ ん トマ ト 〉 アル ファ ベッ トシ リー ズン いえ えい (言え A) いび る び い (いび る B) いし の し い ( 石 の C) いい いい ん 3 
ド 巴 や (良い ヒ ) ぬえ の え ふ ( 化 の F) いじ る じい (て いじ る G) いけ よけい (行け よ K) いえ じ の じ え い (家路 の U) うお の お う ゅ 


閉 ガ の 込み タプ 75 分 


ンジ プリ グリ と 放 穫 さ れ 
る マイ クロ 波 ガ 恐い 


今日 は と て も 天気 が よく て 、 朝 か ら 
さわ や か な 1 日 どっ だ た 。 その せい か ど 
うな RM 
用 し て いる の で 、 打 ちこ む 際 は 特に 
FM 

ー シ ジル キー で 上下 だ 有 有 に 動き つつ 、 
前 方 か ら 飛 来 し て くる 敵 わ スペ ー ス キ 
ー で 、 ビ ー ム っ て し まう ゲー ム で ある 
こと は 、 写 真 を 見 れ ば 明らか で ある ! 

( い ば っ だ り し て ) 

作者 の な 話 で は 、 ス クロ ー ル の 関係 
で 32K の マシ ン で な いと 動か な いそ う 
だ 。 だ めし に 16K の マン シン に ロー ド し 
て み だ け と ど と 、 や っ ぱり 走ら な が か っ た 。 
16K の 人 は 、32K に な る まで この プロ 


敵 は 3 種類 (突然 、 ゲ ー ム の 説明 に 
な っ て し まっ た 。 どうも 今日 は 筆 の 調 
子 が イマ イチ だ な あ 。 ポ リポ リ ) いて 、 
その うち 2 つ は 破壊 で きる けれ ど 、 カ 


エル の 平泳ぎ みた いな 敵 だ け は 破壊 で 


き な い 。 ビ ー ム を こい つ に あて よう も 
の な ら 、 逆 に 強力 
な マイ クロ 波 を 放 
上 EK る 。 ご 
に あだると や ら 必 
の 7 
ステ ー ジ は 14 ま 
も の る 。 デー デシ 
クリ ア ご と に 1000 
点 の ボー ナス が も 
える シス テ ぬ だ 。 
攻撃 し て くる パ 
ター ン に は あま り 


FOR MS 


Am U_U'〔{|i キ | ポ | ポ |= ド リ /// 


p『 ペキン 原 人 | ! 中 


と 旨い 


自作 ゲー ム は 6 本 目 。 全部 ポシェ ッ ト に 
送り まし た 。 し か し 全部 ボツ 。 こ の プロ 
グラ ム は 自信 が あっ た けど 、 採 用 され て 
うれ し い 「! 今 、 ア ド ベ ンチ ャ ー の 画面 
を 股 時 に 出す オプ ログ ラム を 作っ て いて 、 
これ で 大 作 ア ド ベ ンチ ャ ー を 製作 中 。 し 
か し ぼく は 中 学 3 年 生 、 く や し いっ 。 


【 邊 時 8 0 肝 8 MM 8 8 2 EE 8 2 


妥当 時 月 衣 ま 日 衣  M 衣 衣  M 8 MM 2 


ころ が 見 うけ られ な い の が ちょ っ と き 
NN けど と 、 だ ん だ の ん だ ん ルス 
ビー ド が あがっ て 〈 る 。 

と ころ で 、 6 面 か ら は 中 央 に 妙 な も 
の が 出現 する 。 作 者 いわ く 、 ブ ラッ ク 
ホー な が ん だ けれ と ど 。、 と どう いう あわ あけ 
が 緑色 だ 。 こ の プ ブラック ホー ル は 、 を 
の な か に 入っ た も の の 動き を の ろ 〈 く し 
で し まう 、 いや な ヤツ 、。 6 面 中 陰 、 て 
の ブラ ッ ク ホ ー ル が 徐々 に 大 きく な っ 
て 〈 る の て で 注意 が 必要 ど だ 。 へ た に この 
な か に いる と 敵 の 攻撃 を し っ か り と 見 
きわ め つ つも 、 ゆ っ くり 破壊 され て し 
まう こと に な が なら の ちゃ うそ で 。/ 


一 参考 一 一 アス キー「 と に か く 〈 速 い マ 


シン 語 ゲ ー ム 集 , 


^ ム だから カエ ル の 平泳ぎ に 、 は お か つっ ちゃ いけ な いつ つ 一 た の に ! 


グラ ム は お あず け で すね 。 変わ り ば え し た と 
ん ん 7 エット /W + (時 の O) と つ せ ん ぜ っ つと ( 宙 然 Z) (東京 都 ・| .F.) 玄 中 味 は だ いし た こと な いん だ けど 、 こ の 苦し い 展 開 が 好き だ ネ 。 


Z は まあ まあ の で き で す が 、2 カラ ブラム 、 い や 2 .5 カ ラブ ラム あげ まし よう 。 女 


・ ヤ ヤー… 自 機 の Y 二 方 向 移動 用 
G…… 自 機 の 残り 数 ・KI-…… 敵 機 の X 軸 方向 移動 用 
ら G > スコ ・RX…… 敵 機 の Y 二 方向 移動 用 
C…… ス テー ジ 数 画面 ス フ ロ ー ル の マシ ン 語 ルー チ 
X…… 自 機 の X 座 標 ・ 。 。 ン に 渡す ペース アド レス 
Y…… 自 機 の Y 座 標 ・P…… 敵 キヤ ラフ タバ パタ ー ン ナン パー 


・ 画 プロ ブラム の 説明 
・ 10 一 80 初期 設定 
。 90-120 背景 と 点数 表示 部 を 描く 


19 COLOR 9,1.4:SCREEN2 , 1 ,9 
29 CLEAR2099 , &H91FF:DEFINTA-Z:HI=19999:U= 
RND( -TIME ) 
OPEN "GRP: "AS#1 
RESTORE589:FORI=&HE999TO&HE91D 
READD$: POKEI ,VAL("&H"+D$ ) 
NEXT : DEFUSR9=&HE999:DEFUSR1 =&HE99D 
RESTORE599 :FORS=9TO4:FORSP= 1TO8 : READD 
$:D=VAL("&H"+D$) : S も =S$+CHR$(D ) 
89 NEXTSP:SPRITE$(S) =S$:S$=" "ENEXTS: GOTO 
S59 
99 C=C+1:COLOR9 、1 .9:CLS:FORE=9TO129STEP5 
・PSET(9,E) 
199 DRAW"F15D19R19F19R19D19F19R69E19F19R 
69E19U19R19E19R109U19E12":NEXT 
119 U=USR9(&H9299 ) :U=USR9( &HAA99 ) :U=USR6 
(&HC299):COLOR9 :PSET(19,181) .、1:PRINT#1 ," 
SCORE":RIGHT も $(" OR あ (CSCO)D ら )) つの [AGE 
"5 RIGHT も ("4+STR も (C-1).2)j: "7" LEFT ":G- 1 
129 IF C>=7THENCIRCLE(127,95) ,Cx4.2:PAIN 
(127 95) 。2 
139 X=129:Y=159:Y1=179:I=&HAA99:COLORD , 1 
の 
149 FORST=9TO199:A=STICK(9):STRIG(9)ON 
159 XX=(-(A=2)-(A=3)-(A=4)+(A=6)+(A=7)+( 
A=8 ) )※KX2: IFX+XX= く 19THENXX=9ELSEIFX+XX=> 
239THENXX=9 
169 X=X+XX 
179 YY=((A=1)+(A=2)+(A=8)-(A=4)-(A=5)-(A 
=6) )X※KX2:IFY+YY=< く 29THENYY=9ELSEIFY+YY=>1 
69THENYY=9 
189 Y=Y+YY 
199 IFPOINT(X.Y)=2THENK=1ELSEK=19 
299 IFPOINT(X1 、Y1 ) =2THENK1=1ELSEK 1 =8+C 
219 IFY1>=170THENY1=9:X1=INT(RND( 1 ) x130 ) 
+39:RX=(INT(RND( 1 )x39)-15):P=INT(RND( 1 )x 
3)+1 
229 IFX1>=239THENRX=- 1 
239 IFX1= く 39THENRX= 1 9 
249 PUTSPRITE9,(X、Y)、14.0 
259 PUTSPRITE1 、(XL。Y1 ) 。、P+3。P 
269 IF(P<4)AND 1NT(RND( 1)%※(Px4) )=9THEN L 
INE(X1+18.Y1+16)-(X1+8、175) 、9:BEEPELSE280 
270 IFX>=X1-8ANDX= く X1+8ANDY >Y1THEN370 
289 ONSTRIG GOSUB430 
299 ONSPRITEGOSUB369 
399 SPRITEON:1=[-&H209 


ミエ テット / 光 上 み ちゃ ん トマ ト 〉 か た だ み の お の み だ か (て カ だ み の 攻 見 だか?) (東京 都 ・ パ ン フ ネコ ) 交 こ れ を 考え る の に 、 授業 な ん か 
人 * そつ ちの け で 、 1 日 中 ひか け だ そう で …… ど う も アリ ガト 。 で も トマ ト の 道 は 厳し い の じ ゃ 。2 カ ラグ ラム 。 立 


。 130 ラウ ンド 初期 設定 。 一 チェ ンク フ ボ イント 

・140 一 340 ゲー ム メ イン ルー チン ・ 表示 色 が 0 の と き に エラ ー な ど で ス ト 
・350 一 410 自 機 フ ラッ シュ 。 ッ プ が か か る と 、 画 面 の 文字 が 見 えな ご 
・420 一 490 自 機 ミ サイ ル の 発射 と 判定 。 な る の で 、 フ ァ ン フシ ョ ン キ ー に “CO 
* 500 スコ ア 表 示 ・ LOR7” CHRS(13) を 定義 し て 使う 
。 510 一 570 ゲー ム オ ー バ ー 。 と 便利 。100 行 の DRAW 文 の 内 容 で 背景 
・ 580 マシ ン 語 デー タ 。 を 変え る こと が で きる ぞ (変え る 際 は ス 
・590-630 キヤ ラフ タデ ー タ ・ フ ロー ル の 範囲 に 注意 し て ね > 


(Smile YamarmotO) 


319 U=USR1 (1 ) 

320 IFI= く <&H9299THENI=&HC200 

339 Yl=Y1+K1EX1=X1+RX:NEXTST:STRIG( 9 )0EF 
PbAY VI3TZ2SSEDDEFCCD 。、 VI STIS5DSO20DDPFCC" 
349 SC=SC+1999:IFC>14THEN529ELSE99 

359 
359 
370 
360 


SPRITF OFF:RETURN 379 

PLAY"V13T255D" 

PUTSPRITE0 、(X.Y).6.4 

399 G=G-1: IFG= く 9THEN529 

499 LINE(194.181)-(299.188) ,1,BF:PSET(19 
4.181) ,1:PRINT#1.G-1:FORT=TO1999:NEXT T 
419 Yl=9:GOTO 149 

429 ・ 

439 STRIG(9)0FE 

449 LINE(X+8.Y)-(X+8。9)、9 

459 IFX>=X1-8ANDX= く <X1+8ANDY>Y1THEN469ELS 
ERETURN 

469 PLAY"V13T25504F","V13T25501F": SC=SC+ 
199:GOSUB 519:IFP=3THFN480 

479 PUTSPRITE1,(X1.Y1) 、6、4:P=19:Y1=169:R 
ETURN 

489 FORB=9TO059STEP19:CIRCLE(XI+8.YI+8).B 
、9:NEXTB 

499 IF(Y-Y1)=<69THEN379ELSERETURN 

599 ・ 

519 COLOR9:LINE(59、181)-(89,188) 、1,BF:PS 
ET(59.181) 、1:PRINT#1,RIGHT$(" "+STRS 
(SC) 、5 ) : RETURN 「 

529 LINE(69,59)-(299、199) .1、BF:COLOR2, 6 
: STRIG(9)0FF 

539 PSET(88.55) :PRINTH1、"GAME OVER":PSET 
(99.65) : PRINT#1 。"SCORE" : SC 

549 IFSC>=HITHENHI =SC 

559 PSET(75.75):PRINTH1 、"HI-SCORE" HI 
569 PSET(75.85) :PRINT#1 "REPLAY [RET]" 
579 K$=INKEY$:IFK$=CHR$ も (13 )THENG= 3: SC=B: 
C=1:GOT099ELSE579 

589 DATAED.5B、F8 ,F7,21.99、99,91.09、18,C3 
、59。99。23.23。5E。23。56..62.6B。11.99,9。91 、 
6,16,CD,5C。99.C9 

599 DATA19.19.54.96.96.96.D6,28 

699 DATA14,49.6B.3E、1C,98,14,14 

619 DATAE7,66.3C,3C、42,42.24、24 

629 DATA42.84.82.44.38、7C.38,10 

9 DATAA4.6A.2C,FC.3C、52.91.19 


タク 2 
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キヤ ラダ も か が わい 
て 楽し ぴい パズル 


る ん る ん 。 私 は この ゲー ム が 好き だ 。 
と いう の も 、 思 考 型 パズル だ か ら が だ 。 
な ぜ な ら 、 私 は 恐竜 の よう に 反射 神経 
が ニニ グイ か ら だ 。 そ うい えば 、 グ クー と 
いう 、 が つて この へ ん に いた だ 天 ス タッ 
フ は 、 異 様 に 思考 型 ゲ ー ム が 好き だ っ 
だ 。 う ーー ん 、 全 然 関係 な い 。 

を それ に し て も 、 こ の パズル ゲー ム は 
まで 且 革 る. 1 

主人 公 、 ジ ャ ンプ ティ (JUMPTY) 
バン フ テ イ ダン ンク ティ み だい て か 
わい いし 、 石 を な いた だ た り 取 っ た りす る 
迷路 パズル と いう の も 目新し く て いい 。 
[4II6] キ ー で 、 ジ ャ ンプ ティ は 左右 に 


18 旧 電 1 
EIDEUBTEUDTEH HI 1 則 | 
TUIEEUEEUUEUU EL 1 開 剛 和 
IOUEUUEUEUUEEIEHINI 
EEEUUELUUTLIELItH 1 
Nb 
EESIIISIWWU 
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| 
UNITIEEEETEINTIWI 
生 才 あい oto 


ム 主 人 公 の ジャ ンプ ティ 。 


移動 する 。 壁 の 段 に な っ た と ころ は 、 
を の まま で は の ぼれ な いけ れ ど 、 ジ ャ 
ン フ ティ は 石 の 上 な ら の ぼれ る の で 、 
うま く 石 を 置い て や れ ば 壁 の で っ ぱり 


と IM NM NM 8 W 8 W H W W SW W W WM 8 8 / 


' 肛 7 SANDWITCH 


受験 生 な の て で 、 WMAN 
今年 最後 の プロ グラ ム か ん な 


そ 


3 
ト 提 由 上 Bl 月 上 上 MM BN B 邊 っ 


ペー ト 


ー サ せき とき 革 
和志 W 某 。 叶 具 ご 光 び 人 葵 頭 iTS べ へ 兄 


の SFerOw(Y は 時 き 紀信 圭 


せ 9t AS は うき 苦 S ま て 避 送 (r 


と IM IN BN W  % 8 BI 8 8 BB W W 8 8 8 W 8 
> ム ス 症 3 と 対 な FNNH ロ NNS(I 


邊 朋 朋 見 旧 


4 EE EE ED Ei BB RB RE EEB ED ED hm im im mm mm ms 
の 向こう 側 に 行く て こと が で きる の だ 。 
ジャ ンプ ティ は 石 を 持っ て 、 そ れ を 
また 別 の 場所 へ 置く こと で 、 目 分 の 通 
れる 道 を 作っ て いく の だ けれ ど 、 き び 

し い ル ー ル が ひと つ あ る 。 

石 は 、 ジ ャ ンプ ティ の 足もと の 左右 
両方 に ある 場合 だ け 、 ス ペー スキ ー を 
電 し て 取る こと が て きる こと に な っ て 
あの 8 まみ 、 所 つつ は だ の 6 が 、 
上 な ん か に ある 石 は 取れ な いっ て わけ 。 

石 を 置く ほう は わり か し 自由 に な っ 


STONE き て CHRNCE き ROUND 1 


4 まず スペ ー ス キー で 両 わ むき の 石 を 取 つ 


SeeekoiesCS こつ 動 ご つう が の ね お 。 


HHHFLHHHLHL 


4 あわ て て 下 に お り て 、 あ な に は まつ て 
し まつ だ 。 こ れ ば G キ ー 押 すし か な い 。 


面 が 出 て くる 。 
石上 壁 と が 斜め に 重なっ て いる と こ 


ろ は すり ぬけ られ る ぞ 。 

また 、 ど う あ が いて も クリ ア で き な 
い 事 態 に ちち いっ た ら 、 す みや か に |GI 
の キー を 押し て 自殺 する し か な い 。 

この 長き で この お な も し ろ る は な か な 
か あり が た い 。 面 の 数 は ちょ っ と 少な 
いけ れ ど 、 プ ログ ラム を よく 見 て 、 目 
分 で 新しい 面 を 加 を て いく と 、 も っ と 
楽し く 遊 べ る ね 。 


4 な ん の か が ん の と あつ て 、 
よう や ぐ レツ に ゾー ン ヘ へ 。 
2 面 ガ 待ち どど お し いな ! 


Et が 。 作 穫 王 て で 友 へ や 、 
IX キー で 右 へ それ ぞ れ 
石 を な むく こと が で きる 。 

この て まく 人 
を と っ た り 、 置 いた り し て 、 レ ッ ド ポ 
イン ト (赤い 四角 ) の うえ に 乗っ か る 
の が 目的 。 う まく だ どり つけ ば 、 次 の 


画 変 数 リス ト ・F…… 自 分 の 進行 万 向 決定 用 ・ 面 プロ ブラム の 説明 。 プルー ボウ 2 

JU(2)…… 自 分 (JUMPTY) の キャ ヤラ の ・ W-…… 石 を 置 ご 万 向 決定 用 ・100 一 200 初期 設定 ・ 500-550 ラウ ンド クリ ア の 判定 と 画面 
デー タ 配 列 ・ |…… キ ー 入 力 用 ・210 一 270 キー スキ ャ ン ・ 表示 

WA(2)……: 壁 の キャ ラ の デー タ 配 列 ・ ら TL(2)…… 最 初 の 石 の 持ち 数 。280 一 320 自分 の 移動 の 判定 (移動 で き 。 560-570 ギブ アッ プ 

ST(。)…… 石 の キヤ ラ の デー 配列 ・ STO-…- 石 の 残り 数 3 る か ) ・580 一 610 ゲー ム オ ー バ ー 処 理 

X.Y…… 自 分 の 路 標 ・M1$ーM3$…… 音 楽 用 ・330 一 390 石 を 置く 、 取 る ・ 620-720 オー プ ニ ン ブタ イト ル 

M.N…… 石 の 座標 。A(2.)…… ス テー ジ の 状態 。410 JUMPTY (自分 ) 落ち る 。730 一 900 ステ ー ジ 作成 及び その デー タイ 

RD.…: 面 数 ・ BS(<.)…… ス テー ジ 作 成 用 (サブ ルー チン ) ・910 一 1090 キャ ラク 作成 、 デ ー タ 

CH…… 自 分 の 数 。IX.IY…… ス テー ジ 出 力 時 の 座標 (ドッ ト 。420 石 落ち る (サブ ルー チン )  ・ 1100 一 1170 音楽 設定 

COL…… 自 分 の 足 ぶ み 用 ・ 単位 ) ・430 一 490 キヤ ラフ の 表示 や 消去 (〈 サ 。 


199 ′ 一 ショ キ セッ テイ 

119 COLOR7 ,1:WwIDTH49 25: 
ーー 

129 FORI=@TO7:COLOR=(』,9) 
枯 ま B.A.A.M. 

139 NEXT:DEFINT A-Z 
0 1985/ 2/26 | 

149 DIM JU(95),WA(95),ST(95),A(29。11) 
・ 1 BY SANDWICHMAN ! 

159 DIM B も (4.,11):GOSUB929 : GOSUB639 : 


ーーーーーーーーーーーーーーーーーーーーーー プ 


166 ー ン ブフ "ログ ~ ラ ム 


179 RD=9:CH=5:COL= 1 16 

189 RESTORE189:FOR !=9 TO 3:READ STL(I): 
NEXT:DATA 4.9,.19,2 

199 GOSUB749:A(X,Y)=@:STO=STL( RD ) 

299 LOCATE6, 1 :PRINTUSING"STONE 梓 基 CHANC 
E 佳 ROUND "1STOICHiRD+ 1 

219 IF A(X,Y+1)=4 THEN GOTO 51 
人 り 
229 


GOAL IN 
1$=INKEY も :IF 1$="4" THEN :GOTO029 
9 

239 IF 
9 

249 IF 
9 

259 IF 
9 

269 IF 
g 

279 IF 
9 ELSE 269 

289 ' @@@ JUMPTY MOVE @eeeeeeeGeG@ の の の の の 
299 ON COL GOSUB 489,496 

399 IF A(X+F,Y)=3 AND A(X+F,Y-1)=9 THEN 

GOSUB459:X=X+F:Y=Y-1:GOSUB439 : GOT0206 
319 IF A(X+F,Y)=@ THEN GOSUB459:X=X+F:GO 

SUB4369 

329 IF A(X,Y+]1)=9 THEN GOSUB419:GOTO 299 
ELSE 209 

339 ' @@@ イシ ブ 、 オク Or トル @eee@eee@@G@G@G の の @ の 

349 M=X+W:N=Y:GOSUB379:STO0=STO-1:IF STO< 
9 THEN STO0=@:GOTO0299 

359 IF A(M,N)=9 AND A(M,N+1)<>9 THEN A(M 
。N) =3:GOSUB449 

369 IF A(M,N+1)=9 THEN GOSUB429:GOTO 296 
ELSE 209 

379 IF A(M。 N)<>9 THEN GOTO 299 ELSE RET 
URN 

389 IF A(X+1.Y+1 )=3ANDA(X+1.Y)=9AND A(X- 
1,Y+1)=3AND A(X-1 .Y)=9THEN399 ELSE299 
399 FOR !=-1 TO 1 STEP 2:M=X+I:N=Y+1:A(M 
・N)=9:GOSUB469:NEXT :STO=STO+2: GOT0299 

1 ル 且 、、 り 本 、、、、、、、、、、、、、、、、、、、、、、】 

419 WHILE A(X。Y+1 ) =9:GOSUB459:Y=Y+ 1 :GOSU 

B439 : WEND: RETURN 

429 WHILE A(M,N+1 ) =9:GOSUB469:N=N+ 1 : GOSU 

B449:wEND:A(M,N) =3: RETURN 

439 PUT@A(Xx34+35、Yx15+39)-(Xw34+68、Yx15 

+44) ,JU,PSET : RETURN 

449 PUT@A(MxX34+35、Nw15+39)-(Mw34+68、Nx15 

+44 ) ,ST,PSET:RETURN 

459 LINE(Xx34+35.Yx15+39)-(Xx34+58.Yw15+ 

44).PSET,1.BF:RETURN ' ヶ ス No.1 

469 LINE(Mx34+35 。Nw15+39)- (Mx34+68.Nw15+ 

44),PSET,1.BF:RETURN '′ ヶ ス No.2 


東 休 1 


1$="6" THEN ・GOTO029 


1$="Z" THEN GOT034 


1$=“"X" THEN : GOTO034 


1$="G" THEN GOT057 


1$=" "THEN GOTO038 


〈《⑰ み ちゃ ん トマ ト 〉 どけ 、 だ ん な この こ な ん だ けど 《 ど け ~ ! 
劇 で 娘 を 売り と ば す と き に 聞く ネ ! 


479 LINE(9,9)-(639,179) ,PSET , 1 ,BF:RETURN 

489 COLOR=( 4,1 ) :COLOR=(3,7) :COL=2:RETURN 
。 アシ ナミ NO.1 

499 COLOR=(4,7):COLOR=(3 1 ) :COL= 1 :RETURN 
タブ) ま NO。 2 

599 ' @@@ ROUND CLEAR !! @ee の の の の の の の の の 

519 RD=RD+1:IF RD>3 THEN SYMBOL(9.79),"W 

ONDERFULL" ,8.8.2:END 

529 SYMBOL(89,.79),"GOOD !1".9.6.2 

539 FORJ=9TO29 :COLOR=(4.1):COLOR=(3,7):F 

ORI=9TO190:NEXT 

549 COLOR=(4.7):COLOR=(3.1):F 

OR! =9TO199:NEXT:NEXT 

559 GOSUB1169:FORI=9TO15999:NEXT:GOSUB47 

9:GOTO 199 

569 ' @@@ GIVE UP ! |! eee@eGe の の の G の の の の の の の 

579 CH=CH-1:IF CH<9 THEN 599 ELSE GOSUB4 

79:GOTO199 

589 ' @@@ GAME OVER @e@ee@@G@e の GeG@ の の の の の の の 

599 SYMBOL( 39 ,75), "GAME OVER",8.5,.2:SYMB 

0L(189.129) , "REPLAY ? (Y)".3,2,2 

699 GOSUB1179 8 

619 I$=INKEY$:IF 1I$="Y" OR I$="y" THEN G 

OSUB479:GOTO179 ELSE 619 

629 ′ 一 一 タイ トル 


639 FORY=2TO155STEP15:FORX=13TO699STEP34 
:PUT@A(X.Y)-(X+33.Y+14) ,JU,PSET :NEXTX,Y 


9 


649 FORI=9TO14STEP7:SYMBOL(32+I.67),"B.A 


.A.M.".9.5。9 

659 
・A.M.".9.5.6:NEXT 
669 FORI=9TO6STEP2:SYMBOL(99+1,.175), "BY 
SANDWICHMAN" ,4.2.7:NEXT 

679 FORI=9TO2999:NEXT:FORI=9TO7 :COLOR=( 1 
。 1):NEXT 

689 COLOR=(4.1):COLOR=(3.7):FORI=@TO1999 
・ NEXT 、 

699 COLOR=(4.7):COLOR=(3,1):FORI=9TO1999 
:NEXT:IF INKEY$="" THEN 689 

799 GOSUB 479:PBT@A(219.99)-(243,.194) 、JU 
sPSET:FOR I=@ TO 3 

719 SYMBOL(279+1.95), "GOOD LUCK" 2.1.6:N 
EXT:GOSUB1119 

729 FOR !I=9 TO 18999:NEXT :GOSUB 479:RETU 
RN 

739 


SYMBOL(39+!.65),"B.A 


749 RESTORE 829:FORI=@TO 8:FORJ=9TO3: REA 
D B$ も (J, 1! ) :NEXTJ,。1 

759 FORI=9TO16:FORJ=9TO8:A(I 
ぅ り )=VAL(MID$(B$(RD,J) , 1+1,1 ) ) 

769 1X=Iw34135:IY=Jx15+39 
779 IF A(1I,J)=1 THEN PUT@A (IX、IY)-(IX+3 
3。IY+14) ,WA,PSET 

789 IF A(I,J)=2 THEN PUT@A (IX.IY)-(IX+3 
3。IY+14) ,。JU,PSET : X=1:Y=J 

799 IF A(I,J)=3 THEN PUT@A (IX,IY)-(IX+3 
3。IY+14) ,ST。PSET 

899 IF A(I,J)=4 THEN LINE(IX,IY+1 )-(IX+3 
3,1IY+14 ) 、PSET , 2 。 BF 

819 NEXTJ,1:RETURN 

829 DATA11111111111111111.11111 
111.11111111111111111,.111111111 

839 DATA11919191919909991 ,19992999999999 
90 1 ,1999999999999299 1 ,19999999999999991 
849 DATA1111111109199992091 ,19999999999991 
991,.19991119131913191 ,13333999999994991 


1 1 
11 
99 


1 
1 
9 


旦那 この 娘 な ん だ けど ) (埼玉 県 ・ 
これ が 逆さ 言葉 に な つて いる と は ……。4 カ ラグ ラム じゃ 。 立 


859 DATA19999991919339991 ,13339999999111 
991,19999199199919991.11111399999999111 
869 DATA13911991111111991,11119999991091 
90 1 ,1999919911991991 1 ,19999999999919201 
879 DATA13991999999999991 ,19999999919041 
99 1 、19999199199919991,19999911111199931 
889 DATA11941939399999091 , 11333333319991 
991,11499199111911191.11119999999993911 
899 DATA11111111111191911.,11133333319999 
99 1 、11199333333333331 , 1 1 1 19999999991011 
999 DATA11111111111111111.111111 
111.11111111111111111.11111 1 

919 ' 一 一 キャ ラク ター 


11 
1111 


929 LINE(9,1)-( 6, 7),PSET,6,.BF:LINE(11, 
1)-(33。 7 ) ,PSET , 6 , BF 

939 LINE(9.9)-(22.14) ,PSET,6.BF:LINE(27. 
9)-(33,14) ,PSET,6,BF 

949 GET@A(9.9)-(33,14),WA,G:CLS:RESTORE9 
69 

959 FORI=9T095 : READJU( 1 ) :NEXT:FORI=9TO95 
: READST( 1 ) :NEXT :RETURN 

969 DATA -1,-1,-1。-】1。-1.3135,。-1,-15691 ,- 
1 ,-3991 ,-193。-976,-241,-1。-61.9,3 

979 DATA -16384.9,-16384.9、-4996.9,15699 
,9,16383,9,16383,-1,-4996.15,-1.,3 

989 DATA -4996.15,-64.15.3132.15,-15691 , 
-16189,-3991 ,-4933。-976,-241,-1,-64,-1 
999 DATA -4,16383,-1.1923。-1 ,-3841 ,-1,-1 
999,-1,-15616,-1,-16321,-253,-4996,3 
1999 DATA -4.3,-4996,15,-64.15.3132.15,- 
15691,-16381 ,-3991,-3991,-976,-16,-1,-4 
1919 DATA -4933,-4936,15375,-1999,.15369, 
9,3849.9.768.9.9.9.9.16131,-1,-16,9 

1929 DATA -256.63,-4996.9、12288.9,768.0, 
768.9,48.9,48.9.3.9.3,4932.9,13296,9 
1939 DATA 12549.9.831.9,771,-1924.48,163 
89.63,-4996 ,1923.294,-13129,.3276,-13108 
1949 DATA -13198,-13198,-13198,-13198,-1 
3198,-13198,-13198,-13198,-13108,-13198 
1959 DATA -13198,-13198,-13198,-12349,-1 
3198,-12292,-13198,-13969,-13198,-13957 
1969 DATA -13198,-13195,-829,-13198,-4,- 
13129.3276,-13312,.204,-13129.3276 

1979 DATA -13198,-13198,-13198,-13108,-1 
3198,-13198,-13198,-13198,-13198,-13198 
1989 DATA -13198,-13198,-13198,-13198,-1 
2349 ,-13198,-12292,-13198,-13969,-13108 
1999 DATA -13957,-13198,-13195,-829,-131 
98。-4.-13129,3276,-13312 

1199 ニー 緒 が ク 


1119 
還 貞 
1129 M1$="E2G406D2 .C205G4F2 .E2L4GGABO6C2 
・C2" 

1139 M2$= "05L2CEGO6C1 .L805BO6CDCO5BO6C2E 
4C2" 

1149 M3$= "05L4AAR32A8AR32 06C405B8R32B4R 
32A8R32A4G8A2" 

1159 PLAYM1$,"R8"+M1$,"R4"+M1$:RETURN 
1169 PLAYM2$,"R8"+M2$ も ,"R4"+M2$: RETURN 
1179 PLAYM3$,"R8"+M3$,"R4"+M3$: RETURN 
1189 ‥ 

1199 REM @ Produced by Y.HASHIMOTO & H.1 
SHIZUKA $ 


PLAY"V19T29905" 。"V9T29905" ,"V9T2990 


川 馬 義 隆 フ ン ) 立 時 代 4 


*39 


OO 


23 世 紀 、 人 類 は 亜 空間 航行 を 可能 に て 脱走 し 、 宇 宙 


時 代 一 し か し 、 そ うい う 


亜 空間 で 戦う 、 善 こと と き は 必ず 悪者 が 出る 。 
グン の モレ ルス ーッ 軍 を 落ち こぼれ た 悪者 兵士 た もち が 、 ム 正義 の 味 
軍 の 主力 兵器 イン ・ ク ロー ダー を 奪っ 方 の 新 バー 


し た 。 遠 く の 星 と の 祥 易 の は じ ま る 新 海賊 と し な っ て 、 4 | 9 
5 1 4 ー 恩師 、00647 I 
3 CHAW 5 
1 _ の ピン ク の ! 
』 記 光 ペ ン に THANKS!| 。 』 き 、ZI が 左右 へ の 向 
邊 タバ > ニーナ デ 
1 - き を 変え る キー だ 。 
人 由 中 す ・ ms スペ ー ス キー は 、 荷 
まく も ョ 電 粒 子 の ビー ム を 発射 
OU ら ほこ は / する トリ ガー に 4 
れ で ニ 。 る 7 0 これ が 
し ・ 造 0 (し _- 0 
1 3 っ 5 4 中 ググ ョ シン キー の は 、 グ 、 
ma 。 儲 き 7 リ り に Ya 6、7 の 4 つが 瞬間 転 
9 80 と ラノ 位 キ ー に な 
邊 し こ 内 な / キー に も さる の 
ここ ここ - モノ は だ めし 、 と に か 


4 荷 量 電子 ビー ハハ が 、 旧 
イジ ンジ ィ クタ ロータ ー を ピ シ 
ツ と 突き 刺し だ 


に よん だ 。 こと とら 
こ に いた り 、 正 義 の 
味方 で ある キミ は 、 
ジッ グー ター の 
バー ジョ ン ア ッ プ 上 版 、 
イン ・ ク ロー ダーm 
k. 2 を 駆っ て 落ち こ ぼ 
れ 車 人 ども を 退治 に 
香 く の だ つ た 。 
右 か ら 出 て くる モ 
ビッ レル スーツ タオ ア の 
戦闘 機 が キミ の 乗り 
2h ガ 4 ジャグ ロー 
ーmk 2 だ 。 カー ツル 
キー で 上 下 左 右 に 動 


NN 


NN NN 
べ や 


NN 


NN 


9 のり 潮 で 計 (T り UTA 


亜 空 問 に 出没 し は じ め だ た の だ っ た 。 
か も 、 治 安 庁 の 取締 に 対抗 し て 攻撃 衛 
星 ・ フ ェ ノ ー ラ ー を 亜 空間 に は な つ 挙 


く プ ファ ンク ショ ン キ ー 
を 押し て み ょ よう! だ だ し 、 エ ネル ギー 
の 減り が は や く な っ て し まう ぞ 。mk. 2 
は 10 吾 まで 補充 で き る 。 グ ッ ド ラッ ク 。 


上 


4 攻撃 衛星 ・ フ ェ ノ ー ラ ー。 旧 イン ・ フ ロー ダー より 、 こ っ ちの 
ほう が 手ごわい 。 ビ ー ム の 方向 も 6 方 向 あ る の だ 。 


画 変 数 リス ト ・HS-…… 最 高 点 < 60- 80 背景 を ご ・710 一 770 敵 の 旭 発 
A1%(g).A2%(2)……INOLODER mk.・ EX1.EX2.EX…… エ ネル ギー ・ 90 一 110 初期 設定 キヤ ラ 読み 込み ) ・780-810 エネ ルギー 
2 の キャ ラフ タデ ー 1$.P2$.P3$-…… 効 果 音 -・ 120 一 140 オー プ ニ ン グ ブ ・820-930 フィ ー ル ド 座 標 計算 (転位 し 
タ KJLM……FENORLER の 座標 計算 に < 150 一 190 初期 設定 2 ー チ ン ) 
B1%(e).B2%(2)……INCLODER の キ < 使う ・210 敵 の キャ ラ 選 び ・940 一 970 転位 、 エ ネル ギー 表示 
ャ ラフ タデ ー ダ 。 IN…… キ ー ス キャ ン 用 。220 一 290 IN・CLODER の 移動 〈 敵 ) * ga0-1040 ENDING 
G%(<)……FENORLER の キャ ラク フタ ・ TB.…… 逆 の ビー ム ・ 300-340 IN・CLODER の ビーム  ・10601100 背景 デー タ 
と ・T…… 敵 の 種類 ・350 一 380 FENORLER の 物 動 ( 敵 ) 。1110-1140 IN-CLODER mk.2 の デ 
SA%(<).SG%(<)…… 空 白 ( キ ャ ラフ タ * AP.…. 敵 の 出現 の させ 方 ・390-430 FENORLER の ビー ム < ー タ 
を 消す こき に 便 つ ) 。 FX.FY…… 瞬 間 移 動 中 の 座標 .。440 一 480 IN'CLODER mmK.2( 自 機 ) ・ 1150-1180 IN-CLODER の デー タ 
TX1.TX2.TX.TY1.TY2.TY…… 。X.W.Y ア の ……ENDING 時 の スコ ア 、 ハ * の 物 動 ・1190 FENORLER の デー ツヤ 
| 敵 の 座標 * イ ・ ス コア 表示 位置 。490-550 IN・CLODER mk.2 の キー * 
MX1.MX2.MX.MY1.MY2.MY ・MO-…… 自 機 の 向き フラ ブ * 入力 9 
| 自 機 の 座標 ・ 画 プ ロブ ラム 説明 ・560 一 610 IN・CLODER mk.2 の 表示 。 
A…… 自 機 の 残り 数 ・ 40 一 50 初期 設定 ・620-700 INrCLODER mk.2 の ビーム * 


19 『 

29 『" "IN・CLODER mkK.2" Pr 
oduced by CHAM 85/2/17 

39 " 


49 WIDTH89,25:COLOR7 ,9:DEFINTA-Z:SCREEN7 
。7:RANDOMIZE TIME 

59 DIMA1X(95) ,A2%(95) , B1X(95) ,B2%(95) ,G% 
( 23) ,SAX(95) , SG%( 23 ) 

69 COLOR=(3.9):FOR !I=9 TO 18 :READ A,B,C 
。D:iLINE(A,B) -(C,D) , PSET , 3:NEXT 

79 COLOR=(4.1):FOR 1I=9 TO 17:READ A,B,C。 

D:LINE(A,B)-(C,D) ,PSET , 4 :NEXT 

89 FOR !I=9 TO 6:READ A:LINE(9.A)-(639.A) 
, PSET 。 1 : NEXT 

99 FOR I=9 TO 95:READ AIX(I):NEXT:FOR 1!= 
9 TO 95:READ A2%( 1 ) :NEXT 

199 FOR !I=9 TO 95:READ B1%(I):NEXT:FOR 1! 
=9 TO 95:READ B2%( 1』):NEXT 

119 FORI=9T023:READGX( ! ):NEXTIEPLAY"T199 
""T199":EX1=329:EX2=1:A=19:SC=9 

129 SYMBOL(89 ,59) ,"IN・CLODER mk.2"。4.4.6 
: SYMBOL(78,49) , "1N・CLODER mk.2",4.4。2 
139 PLAY"05G8 .C8D8 .04G8A805C8 .04B8.G16A4 
"。 "03G2G1602G16R32G802A2A8" 

149 PLAY"04R64E8F8 .A8.05C8 .E8G8C2" "03R6 
4G8F8 .D8 .C402B803C2":FORI=9T09999:NEXTI 
159 LINE(9.9)-6639.149),PSET ,9,BF:P1$= "0 
2A16B64":P2$= "03R64E64" :P3$= "04R64G+2" 
169 ONKEY( 1 )GOSUB829 :ONKEY( 2 )GOSUB859:ON 
KEY( 6 )GOSUB889 : ONKEY( 7 )GOSUB919 

179 MX1=699:MY1=139:LINE(9.9)-(639.9) ,PS 
ET,1:LINE(329.9)-(699.,7) ,PSET , 2 , BF 

189 LOCATE 5,.9:PRINTUSING" SCORE 普 拉 革 基 "1 SC 
:GOTO 219 

199 LOCATE 25.9:PRINTUSING"REST 昔 革 "5AEIF 
A く 1 THEN GOTO 989 ELSE RETURN 

299 Main Progra 征 

219 TX=9:TY=RNDw 119+19:T=RNDx1+1:ON T GO 
TO 229.,359 

229 AP=RNDX2+1:ON AP GOTO 239,249 

239 TX=RNDx599+59:TY=RNDx199+19:PUT@A(TX 
。TY)-(TX+31 、TY+15) ,G%,PSET 

249 TX2=SGN(MX 1 -TX1)x16:TY2=SGN( MY1 -TY1 ) 
8 

259 TX1=TX:TX=TX1+TX2:IF TX<9 OR TX+31 >6 
39 THEN TX=TX1 

269 TY1=TY:TY=TY1+TY2:IiF TY く <19 OR TY+15> 
149 THEN TY=TY1 

279 PUT@A(TX1.TY1)-(TX1+31、TY1+15) ,SA%,P 
SET:ON (TX2/16)+2 GOTO 289,399.296 

289 PUT@A(TX.TY)-(TX+31 .TY+15) 、B1X,PSET : 
GOTO 399 

299 PUT@A(TX,TY)-(TX+31.TY+15) ,B2X,PSET 
399 TB=RNDw5: IFTB く >9THEN 499 ELSEPLAYP1$ 
。P2$。P3$:ON (TX2/16)+2 GOTO 319,319,339 
319 LINE(TX,TY+5)-(9,TY+5) ,XOR,6:LINE(TX 
>TY+5)-(9,TY+5) ,XOR,6 

329 IF TY+5>MY1 AND TY+5<MY1+7 AND (TX2/ 
16 )+2=1 THEN 459 ELSE 499 

339 LINE(TX+31.,TY+5)-(639,TY+5) ,XOR,6:LI 
NE(TX+31 ,.TY+5)-(639.TY+5) ,XOR,6 

349 IF TY+5>MY1 AND TY+5<MY1+7 AND (TX2/ 
16)+2=3 THEN 459 ELSE 499 

359 TX=9:K=RNDx15+3: し =RNDx15+39:M=(RNDx7 
)\19+39 

369 TX1=TX/L:TY1=TY:TX=(TX1+29)\ し :IFTX1+ 
16 く <=699THENTY=KwCOS( 3/189xTX)+M:GOTO386 
379 PUT@A(TX1,TY1)-(TX1+31 、TY1+15) ,SA%,P 
SET : GOTO 189 

389 PUT@A(TX1,.TY1)-(TX1+15.TY1+7) 、SGX , PS 
ET :PUT@A(TX/L,TY)-(TX/L+15.TY+7) ,GX,OR 
399 TB=RNDx5:IF TB く <>9 THEN 499 ELSE PLAY 
"02C64C+64D64D+64E64F64F+64G64G+64" 

499 LINE(TX/L+16.TY+4)-(639.TY+4),XOR,5: 
LINE(TX/L+16,TY+4)-(639,TY+4) ,XOR,5 

419 LINE(TX/L,TY+4)-(9.TY+4) ,XOR,5:LINE( 
TX/L,TY+4)-(9.TY+4) ,XOR,5 

429 LINE(TX/L+8,TY)-(TX/L+8.9),XOR.5:LIN 
E(TX/L+8.TY)-(TX/L+8,9) ,XOR, 5 

439 LINE(TX/L+8、TY+8)-(TX/L+8.199) ,XOR, 5 
:LINE(TX/L+8.TY+8)-(TX/L+8 ,199) ,XOR,5 
449 IF MX1<TX/L+8ANDMX1+31 >TX/L+8 OR MY1 
く TY+4ANDMY1+15>TY+4 THEN 459 ELSE 499 
459 CIRCLE(MX1+16、MY1+8),15.2。.,,F,XOR:C 
IRCLE(MX1+16.MY1+8)、15.2。,,,F,XOR 

469 GOSUB 2999:PUT@A(MX1.MY1)-(MX1+31 、MY 

_-1+15) ,SA%X,PSET : GOSUB 2109 


本 テッ 
更 休 1 


479 SOUND5 , 15 : SOUND6 , 35 : SOUND7, 27 :SOUND1 
1 ,19:SOUND12.89:SOUND13.9:SOUND19,16 

489 MX1=699:MY1=139:A=A-1:MC=1:GOSUB 199 
:LINE(329.9)-(699.7) ,PSET , 2.BF:EX1=329 
499 KEY(1)STOP:KEY(2)STOP:KEY(6)STOP:KEY 
( 7) STOP 

599 COLOR=(3,.9) :COLOR=(4,1):IN=PEEK( &HFD 

91 ) 

519 IF IN=52 THEN MX2=-39:GOTO549 ELSE ! 

F IN=54 THEN MX2=+39:GOTO549 

529 IF IN=56 THEN MY2=-15:GOTO549 ELSE I 

F IN=59 THEN MY2=+15:GOTO0549 

539 IF IN=99 THEN MC=1:GOTO 549 ELSE IF 
IN=88 THEN MC=2 

549 MX=MX1+MX2: IF MX+32>639 OR MX く <9 THEN 
MX=MX 1 : MCX= 1 ELSE MCX=9 

559 MY=MY1+MY2:IF MY+16>149 OR MY<19 THE 

N MY=MY1:MCY=1 ELSE MCX=9 

569 ON (MCX+MCY)+1 GOTO 579.579.589 

579 PUT@A(MX1 MY1)-(MX1+31 MY1+15) ,SA%,P 

SET 

589 ON MC GOTO 599,699 

599 PUT@A(MX,MY)-(MX+31.MY+15) ,A1X,PSET : 

GOTO 616 

699 PUT@A(MX ,MY ) - (MX+31 ,MY+15) ,A2%X,PSET 

619 MX1=MX:MY1=MY:KEY(1)ON:KEY(2)0N:KEY( 

6)ON:KEY(7)0ON 

629 IF IN=32 THEN PLAY P1$,、P2$,P3$:EX2=3 
:ON MC GOTO 639.679 ELSE 789 

639 LINE(MX ,MY+5)-(9.,MY+5) .XOR.6:LINE(MX 
。MY+5)-(9.MY+5 ) ,XOR,6 

649 ON T GOTO 659,.669 

659 IF TX<MX AND TY<MY+5 AND TY+19>MY+5 

THEN 719 ELSE 789 

669 IF TX/L< く MX AND TY+1<MY+5 AND TY+6>MY 

+5 THEN 719 ELSE 789 

679 LINE(MX+31 ,MY+5)-(639.MY+5) ,XOR,6:LI 

NE(MX+31 ,MY+5)-(639.MY+5 ) , XOR, 6 

689 ON T GOTO 699,799 

699 IF TX>MX AND TY<MY+5 AND TY+19>MY+5 

THEN 719 ELSE 789 

799 IF TX/L>MX AND TY+1<MY+5 AND TY+6>MY 
+5 THEN 719 ELSE 789 

719 ON T GOTO 729.749 

729 CIRCLE(TX+13。MY+5).8.2。。、。,F,XOR:CIRC 
LE(TX+13.MY+5) ,8.2,,,。F,XOR 

73g9 SC=SC+(RNDX5+3)\19:PUT@A(TX。TY)-(TX+ 
31 ,TY+15) ,SAX,PSET:GOTO 766 

749 CIRCLE(TX/L+13。MY+5) .8,2,,,。,。F,XOR:CI 
RCLE(TX/L+13.MY+5) 、8.2。、,,F,、XOR 

759 SC=SC+(RNDx5+5)x19:PUT@A(TX/L,TY)-(T 
X/L+15.TY+7) 、SGX , PSET 

769 SOUND1 , 15:SOUND6 , 63 : SOUND7 , 54 : SOUND1 
1 , 29 : SOUND1 2 ,39 : SOUND13.9: SOUND8, 16 

779 MX1=MX:MY1=MY:GOTO 189 

789 EX=EX1+EX2:IFEX く 599THENLINE(EX1,9)-( 
EX, 7 ) ,、PSET ,6,BF:EX1=EX:EX2=9:GOTO 819 
799 IFA>1THENCIRCLE(MX1+15.、MY1+7).15.5:A 
=A- 1ELSE989 

899 LINE(329、9)-(69,7) ,PSET ,2.BF:EX1=32 
9:GOSUB 199 

819 EX2=1:COLOR=(4.9):COLOR=(3.1):ON T G 

OTO 249、366 

829 GOSUB 2999:CIRCLE(MX1+15.MY1+7) ,14,.7 
: PUT@A(MX1 ,。MY1 )-(MX1+31.MY1+15) ,SAX,PSET 
9 か IF MX1-299>9 THEN FX=MX1-299 ELSE FX 
849 IF MY1+56<159 THEN FY=MY1+49:GOTO 94 
9 ELSE FY=139:GOTO 949 

856 GOSUB 2199:CIRCLE(MX1+15。MY1+7).14,7 
: PUT@A(MX1 MY1 )-(MX1+31 ,MY1+15) ,SA%,PSET 
869 IF MX1+232<699 THEN FX=MX1+299 ELSE 
FX=699 

879 IF MY1+5R く 159 THEN FY=MY1+49:GOTO 94 
9 ELSE FY=139:GOTO 946 

889 GOSUB 2999:CIRCLE(MX1+15.MY1+7) ,14,7 
: PUT@A(MX1 ,MY1)-(MX1+31.MY1+15) ,SAX,PSET 
899 IF MX1-299>9 THEN FX=MX1-299 ELSE FX 
=19 

999 IF MY1-49>19 THEN FY=MY1-49:GOTO 949 
ELSE FY=19:GOTO 949 

919 GOSUB 2999:CIRCLE(MX1+15.MY1+7) ,14.7 
:PUT@A(MX1 ,MY1)-(MX1+31.MY1+15) ,SA%X, PSET 
929 IF MX1+232<699 THEN FX=MX1+299 ELSE 
FX=690 

時 1F MY1-49>19 THEN FY=MY1-49 ELSE FY= 
りり) 

949 LINE(MX1+15、MY1+7)-(FX+15,.FY+7 ) ,XOR, 
7:LINE(MX1+15。MY1+7)-(FX+15,.FY+7) ,XOR,7 


〈《 み ちゃ ん トマ ト 〉 きじ いい わか も めも か わい いじ き (キジ いい わ 、 カ モメ も か わい い 時 期 ) (新潟 県 ・ 風 来 ) 交 愛 島 週 間 
に 考え た の か な や ゃ な ん で も いい けど 、 す つか り の 常連 の 風 来 先 生 。3 カラ ブラ ム 。* 


959 CIRCLE(FX+15。FY+7) ,14.7:PUT@A(FX,FY) 
-(FX+31 。FY+15) ,A1X,PSET :MX1 =FX:MY1 =FY:GO 
SUB 2199 

969 MX2=9:MY2=9:IF EX+49<699 THEN EX2=EX 
2+29:RETURN ELSE A=A-1:GOSUB 199 

979 IF A>9 THEN PLAY"O1C8", "03E8":LINE(3 
29.9)-(699,7) ,PSET ,2,BF:EX1=329:RETURN 
989 W=39:X=59:Y=59:Z=609 

999 LINE(9.19)-(639,149) ,PSET,9,BF:C1=6: 
C2=s6 

1999 IF SC>HS THEN HS=SC:LOCATE 29,12:CO 
LOR 2:PRINT"You produced HIGH SCORE !!『" 
1919 FORI=9TO1 :SYMBOL(X,W) , "Your Score 
"+STR$(SC) ,3.3、C1:W=W-2:X=X-2:C1=2:NEXT 
1929 FORI=9TO1:SYMBOL(Y ,Z) , "High Score 
"+STR$(HS) ,3 3,C2:Y=Y-2:Z=Z-2:C2=2:NEXT 
1939 LOCATE29,14:COLOR 5:PRINT"If you pl 
ay again , hit a key! 1!" :X も =INPUT も ( 2 ) 
1949 LINE(9.9)-(639,149) ,PSET , 9 ,BF:COLOR 
7:EX1=329:A=19:SC=9:GOTO169 

1959 『" Data of Back & Character 
1969 DATA 32.159.9,153.62,159,.9,169,.96,1 
59.9,179,128.159.9.184.169,159.9、199,.192 
。159,64.199.224.159,128.199.256,159,192。 
199.288,159,256,199.329.159.329,199,352 
159,384,199.384,159,448.199,.416.159,512。, 
199,448,159.576,199,489.159,.639,199,.512, 
159.639,184 

1979 DATA 544.159.639,.179.576,159,639,.16 
9 り .698,159,639,154 

1989 DATA48.159.9,156.89.159.9.165,112,1 
59,9,176,144.159,9,199,176,159,.36,199,29 
8.159,.96,199,249,159,169,199.272.159,224 
。199.3g4,159,.288,199,336, 159,352,199.368 
。159,416,199.499.159,489.199.436.159,544 
199,.464.159,698,199,.492、159.639.199,528 
>159.639,176 

1999 DATA 569,159.639.165、592、159,.639,15 
6 

1199 DATA 159.151.154.169,179.182,.199 
1119 DATA9.9.9.576.9.6272.69,32512.23,.28 
169,-2,-8448.93。-17984.7.31776.9,-18498。 
9,。-17472。1.-24664.9.26698,.9,.232.9.4.9,9, 
9,9,9,9,9、569.9.6144.64,-2948.7,.24576.,25 
6,-19249.125,-18432.7.31744.9,-18419,9,- 
17472。1 。-24664.9.26698.9.232.9,.4.9.9.9,9 
>9、9.9.624 

1129 DATA9.6272.64.32512.7.28169,256,-84 
48,125。-17984.7.31776.9,-18492.9,-17472, 
1 ,-24664.9.26698.9,.232.9、4.9.9.9.9 

1139 DATA9.9.576.9.272.9.236.7689,.116,-7 
168,238.32767,479,-13312.574。-4996.1977。 
9,7934.9,2922.9.3547.9,7998.9.8794.9,.192 
4.9,9.9.9.9.3136.9,16,9、15,256.4,-8192,1 
4.9.3,.3972.46,-4996.6197.9.7934.9.2922.9 
。3547.9.7998.9.8794.9,.1924.9.9.9,.9,9.364 
8.9.272.9 

1149 DATA236,.256.116,-8192.238.9.451.397 
2.558,-4996.7221.9.7934.9.2922.9.3547.9。 
7998.9.8794.9,1924.9.9,.9 

1159 DATA9,9.9、19368.9,5248.69,39848,23, 
16512.-2,-19249,125,-22528.7,21594.9、-18 
384,9,-17472,1、-24669.9.26698,.9.232.9,4。 
9.9.9、9.9.9,9,128.9,128.64,-39784.9.3712 
9.1984.9.384.9,.9.9,9.9.9,9,9.9.9、9.9.0。 
9.9.9.9.9.9.9,9,19368.9,5248.64.39848.7, 
16512,.256 

1169 DATA-19249,125.-22528.7.21594.9,-18 
384.9,-17472,1,-24669.9,26698.9,232.9,4。 
9.9.9.B 

1179 DATA9,9,296.9.336.9.286.7689.258,-7 
168,14.32767,31 ,-13312.62,-4996.21.9,793 
4.9,2922.9.3547.9,7998.9.8794.9,1924.9,9 
。9.9,9.256.9,256.9.993、256,368,9,736., 9 , 1 
92.9.9.9、.9.9.9.9.9.9.9.9.9.9.9、9.9.9.9,.9 
。9.9,296.9.336.9.286,.256.258,-8192.14.9。 
3, 3972 46 

1189 DATA-4996,21.9,7934.9.2922.9.3547,9 
,7998.9.8794.9.1924.9.9,9 

1199 DATA-16381,4989,12399,12812.12812,1 
2399 , 4989,-16381,-16381.2948.8299.9169,9 
169.8299 ,2948,-16381.969.2948.8299,-7669 
>-7669.8299,2948,.960 

2999 KEY(1) OFF:KEY(2) OFF:KEY(6) OFF:KE 
Y(7) OFF:RETURN 

2199 KEY(1) ON:KEY(2) ON:KEY(6) ON:KEY(7 
) ON: RETURN 
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マニ ア に 高く 売れ る 
MEW の 少女 ヘレ ナ 
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か わい い 猫 耳 少 
女 の 名 前 は ヘレ ナ 。 
地球 か らき た 商人 
ゆ 、 収 胡 の よう な 


と いう こと は 、 


鑑 耳 少女 の こと を m 現在 、 遊 び 人 
MEW と 呼ん だ 。 の ISSEI 
MEW は る の 筋 の CG で 4 連続 ポッ 
マニ ア に 高く 売れ に な っ た か ら プ ロ 
88 ee グラ ム に 転向 し た な ん 
し て の 5 仲間 の 連 て ロロ が さけ て も いえ な い 、 元 神奈 川 県 立 


続 大 跡 事件 あわ つき 
と め る ため 、 へ ヘレ 
ナ は 秘密 結社 V4- 
MNTI で 東 り こん 
秘 褒 結社 の 汎用 
ラン ピュ ョ ュー ダ TUNO が あや つる ラン デ 
ィング ウォ ー カ ー に つか ' ま らら な いよ う 、 
床 に 沙 ち て いる カギ を すべ で て ひろ っ て 
ドア の と ころ まで 行け ば 、 次 の 部 屋 へ 
NH 
RY 3 2 旨 MP 


| 計上 胃 5 胃 軒 計上 朋 見 胃 朋 胃 見 月 上 朋 朋 見 思 衣 半 ) 


を 持っ て な いか な ー。 


人 府 


Y ss 


田奈 高校 マイ コン 部 部 長 の ISSEI で す 。 趣 
味 は マイ コン 、 バ イク 、 
・ メ イデ ン と 坂本 龍一 を 聴く こと で す 。 
あと 、 マ ザー グー ス を 
ころ で 、 誰か アー サー・ 
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売 む の も 趣味 。 と 
ラッ カム の 画集 
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タ NNNTUII 
WM: 
まく 袋小路 に 閉 キ き WII 
上 : 
じ 5 の の カカ 可 和 4 
さ Ni 1 
を いひ の る て 100 還 NM 
OX EN 1 い NMh 
り は いい の だ 。 ^ 記 NHWMMN 0 央 
の SIN の ( 1 3 HH 場 Bi ! 補 直 
傘 中 て と うし い NM MM III 
> 提 告 拓 
だ らい い の か わ III 


あの の キー 


追い か け ご っ こ を 続け る し か な い の だ 。 か ら な く な っ た ら 、 [PF5| の キー の 下 NO 放 の あ 
いつ) < (e】 い O ーー o らら だ * oO 
SNt2es 上 で 一 時 スト ッ プ も で きる 。 ス ペー 
ヘレ ナ の 移動 は テン キー。 ヘ レナ は スキ ー で 、 ゲ ー ム 再 ス ター ト だ 。 な い の て 、 そ の つも 9 て ね 。 
逃げ る だ け で 攻 峡 す る 力 は な い 。 た だ 、 カギ は 1 個 100 点 。 と きど き 出 て くる 面 は 、 な ん と 30 面 まで ある 。 0 
「 1 SN) ヽ 6 9 「 
英 の ラン ディ ング ウォ ー カ ー は 、 一 定 ボー ナス え の イ チコ は な ん と 900 訓 。 ドア わく 、" は っ きり いっ て 、 ク リプ て きる 
CO2 パ ダー ジン て 人 いか り て 《 る の で 、、 う は 、 カ ギ を すべ て ひろ わな けれ ば あか 1 
画 変 数 リス ト ・H(e)%…… い ちご の キャ ラフ マタ デー タ  ・X.Y…… ス フク リーン (画面) 上 で の ME :C…… し D1 号 用 の 乱数 
A(2)%…… ス テー ジ デ ー タ マ ・ZH-…- ハ イス コア M W の 珍 標 ・A1.B1……LD1 号 を 画面 上 ひら 消す 座標 
B(e)%…… ス テー ジ パ タ ー ン と スク フリ ー 。ZS…… ス コア ・VX.VY…… 論 理 式 で 得 た MEW の 進む ・BX2.BY2…… 仮 想 画面 上 で の LD2 号 の 
ン の 状況 ・ STAGE…… ス テー ジ の 番号 6 方 向 1 初期 座標 
C(2)%…… 壁 の キャ ラフ タデ ー タ ・MEW……MEW の 数 ・ AB……MEW を 画面 上 ひら 消す 座標 ・ X2.Y2……LD2 号 の 画面 上 の 座標 
D(2%…… ド ア の キャ ラフ タデ ー タ ・M1$ーM5$…… ブ レイ 文 デ ー タ ・BX1.BX2-…… 仮 想 画 面 上 で の し D1 号 の 。LX.LY……L し D2 号 の 初期 進行 方向 
E( る 7%…… ラ ン デ ィング ブウ オー カ (以後 * 〇 ……LD1 号 の 乱数 の 範囲 。 初期 座標 ・ 〇 1……LD2 号 用 の 天 数 
LD) キャ ラフ タデ ー タ マ ・SR…… 錠 の 数 ・ X1.Y1…… し D1 号 の 画面 上 の 座標 ・A2.B2…… し D2 号 を 画面 上 ひら 消す 座標 
F(e%……MEW の キャ ラフ タデ ー タ  ? KR…… 取 つ だ 錠 の 数 ・DX.DY……LD1 号 が MEW を 追い ガ け 。 KS……: キ ー ス キャ ン 用 
G(2%…… 錠 の キャ ラフ タデ ー タ ・BX.BY…… ス テー ジ で の MEW の 座標 < る 範囲 ・ 画 チェ ン フ ボイン ト 


険 、 (MEW〉 この ネコ の キヤ ラ 、 も の すご ーー こ カ わ いい と 思わ な い ゃ 
球根 で は あり ませ ん ) し まし た が 、 身 分 違い の 窟 は 許さ れず 、 一 生 チ ヨン ガー で いる 決 羽 を し まし た 。 め で た し めで だ し !? 


パン プ ネ コ は 思わ ず 求 婚 (ヒヤ シン ス と ガク ロッツ カス の 


ラン ディ ング ウオ ー カ 1 号 の 追い 方 が と * 110-210 ステ ー ジ デー タ の 読み 込み 、 < き の 処 理 ・540-570 ゲー ム 中 断 時 の 処理 
ろ い と 思う 人 は 140 行 の 〇 の 値 を 0 に し て ・ 表示 ・430 一 460 MEW が ザビ ア の 下 に 来 だ と き ・580600 画面 の フリ ア 

み ま し よう 。 恐 帽 の ラン ディ ング ウォ ー < 220-370 キャ ラフ タ の 移動 、MEW の < の 処理 ・610 一 640 ゲー ム オ ー バ ー の 処理 
カカ 1 号 の 誕生 で す 。 CE < 行動 判定 ・470 一 480 _ MEW が 捕 ま つ だ と き の 負 理 “660-710 デー タ 読 み 込み 

硬 プ ロブ ラム の 説明 ・380 一 390 _ MEW が KEY を と つた だ と き の ・ 490 一 510 スコ ア 表 示 ・720 一 990 デー マ 

20- 40 初期 設定 6 処理 ・520-530 ラン ディ ング ウォー カー1 号 。 

50-100 画面 は し の 初期 画面 ・ 400-420 MEW ガ ボー ナス を と つた と <* を 速 こ する 処理 5 


29 WIDTH 49,25:RANDOMIZE TIME:DEFINT A-Y 


・ONKEY(5)GOSUB 559:ON INTERVAL GOSUB 419 
:・ONTIME GOSUB 539:KEY(5)ON: INTERVAL 30:T 
IME"99:92:19" 

39 DIM AX(19),BX(15.9),CX(119).D%X(119),E 

%(97) ,FX(97) ,GX(19) ,HX(44):ZHI=9:DEFFNZ( 

Z)=-(Z>32767)x(Z-65536! ) -(Z く <=32767 ) *Z:GO 

SUB 659 

49 ZS=9:STAGE=1:MEW=5:PLAY"V19T25505" :MI 

$="L9ABEBAA-" :M2$="L17ACCA-CCA-CC" iM3$=“ 

L17DEFCAECFAGCEG" : M4$="L8BGADFEDCC" :M5 も = 
"04L9CDEFDCGDEO5" 

5 ' ※※ 半 半 基 洋 着 党 ※ 基 TITLE & SCREEN 

69 FOR 1!I=9 TO 6:SYMBOL(517+1.1).」 "MP 5,4。 
I+3:SYMBOL(557,1) "EE" 、5、4,1+4 

79 SYMBOL(597-1,1), "WM".5.4。1+3:NEXT:SYMB 

0L(529,35) 。" ISSEI PRESENTS" , 1,1.1 

89 LOCATE 32.6:PRINT "HI SCORE":LOCATE 3 
3,7:PRINT USING "半音 欄間 基 " ュ ZH1I 

99 LOCATE 35,9:PRINT "SCORE":LOCATE 37,1 
2:PRINT "MEWw" 

199 LOCATE 35.15:PRINT "STAGE":LOCATE 33 
。18:PRINT "WINDOW" : GOSUB599 

1 1 ' 迷 半 半 半 着 基 基 基 拓 基 MAKE A STAGE 

129 LINE(514,152)-(639,199) .PSET , 1 ,BF 
139 FOR I=9@ TO 19:READ A$:Z=VAL("&H"+A$) 
:Z=FNZ(Z):AX( IT)=Z:NEXT 

149 Q=1:TIME$="99:99:99":READ SR:KR=9:U= 
9:PUT@(9,9)-(159,1) ,A%,PSET , 7 

159 FOR Y=9 TO 9:FOR X=@ TO 15 

169 P1=POINT(X+U,9):P2=POINT(X+U, 1 ) : B%(X 
、Y)=-(P1x3+P2 ) : NEXT X:U=U+16:NEXT Y 

179 FOR Y=9 TO 9:FOR X=9 TO 15 

189 IF BX(X,Y)=1 THEN PUT@(XX32+7,Yx29 )- 
( Xx32+24。Yw29+19) ,G%,PSET , 6 

199 IF BX(X,Y)=3 THEN PUT@A(XX32.Yx29-29 
)- (XX32+31 ,Yx29-1 ) ,D%,PSET 

299 IF BX(X,Y)=4 THEN PUT@A(XX32.Yx29)-( 
XX32+31 、Yx29+19) ,C%,PSET 

219 NEXT X:NEXT Y 

22  ' 差 療 美 洋 其 基 湊 ※ MAIN 

239 BX=14:BY=1:BX1=1:BX2=1:BY1=8:BY2=8:X 
=32wBX:Y=29xBY:X1=32xBX1:Y1=29xBY1:X2=32 
XBX2:Y2=BY2w29:LX=1:LY=-1:BX(8,1)=9:TIME 
ON: INTERVAL ON 

249 KS=PEEK( &HFD91 ):A=X:B=Y 

259 VX=-(KS=&H34 )*(BX(BX- 1 ,BY) く <4)+(KS=&H 
36 )x(BX(BX+ 1 ,BY ) く 4 ):X=X+VXx32:BX=BX+VX 
269 VY=-(KS=&H38 )x(BX(BX,BY-1 ) く <4)+(KS=&H 
32)x(BX(BX,BY+1) く 4):Y=Y+VYx29:BY=BY+VY 
279 LINE(A+3,B)-(A+28,B+19) ,PRESET , , BF:P 
UT@A(X+3。Y)-(X+28,Y+19) ,F%,PSET 

289 ON BX(BX,BY) GOTO 399,429.449 

299 C=RND( 1 ) xQ:A1=X1:B1=Y1:DX=-SGN(X-X1 ) 
\(C=Q):DY=-SGN(Y-Y1 )x(C=9) 

399 IF BX(BX1+DX,BY1 ) く 4 THEN X1=X1+DXx32 
: BX1=BX1+DX 

319 IF BX(BX1,BY1+DY)<4 THEN Y1=Y1+DYx29 
: BY1=BY1+DY 

329 PUT@A(A1+3.B1)-(A1+28.B1+19) ,E%,XOR: 
PUT@A(X1+3,Y1)-(X1+28、Y1+19) .E%,XOR 

339 C1=RND( 1 )x1:A2=X2:B2=Y2 

349 IF BX(BX2+LX, BY2 ) >3 THEN LX=(C1=9)x2 
+1 ELSE X2=X2+LXX32:BX2=BX2+LX 

359 IF BX(BX2,BY2+LY ) >3 THEN LY=(C1=1 ) x2 
+1 ELSE Y2=Y2+LYx29:BY2=BY2+LY 

369 PUT@A(A2+3,B2)-(A2+28,.B2+19) ,EX,XOR: 
PUT@A(X2+3。Y2)-(X2+28.Y2+19) 、E%,XOR 

379 IF X=X1 AND Y=Y1 OR X=X2 AND Y=Y2 TH 
EN 479 ELSE GOTO 249 

38  ' 半 湊 共 基 基 半 半 基 TAKE KEY 

399 ZS=ZS+199:KR=KR+1:BX(BX.BY)=9:PLAY M 
1$:LOCATE 33,19:PRINT USING" 拉 神 提 提 井 守 "5Z5: 
GOTO 299 

4  ' 迷 洋洋 洋洋 ※ 若 基 STROW BELLY 

419 B%X(8,1)=2:PUT@A(263,23) - (289,35) ,HX。 
PSET : RETURN 

429 PLAY M3$:ZS=ZS+599:BX(8,1)=9:LOCATE 
33,19:PRINT USING "欄間 提 井 革 " 5ZS:GOTO 296 
43 介 ' 差 基 基 基 基 芝 基 基 OPEN DOOR 

449 IF KR=SR AND B%X(BX,BY)=3 THEN STAGE= 
STAGE+1 ELSE GOTO 299 

459 IF STAGE=31 THEN STAGE=1:TIME"99:91: 
19":RESTORE 856 

469 PLAY M4$:INTERVAL OFF:TIME OFF:GOSUB 
599:GOSUB 599:GOTO 119 

47  ' 糞 着 着 湊 湊 芝 芝 甘 其 基 CATCH UP wITH MEW 

489 TIME OFF:INTERVAL OFF:MEWw=MEW-1:IF M 
EW=9 THEN 619 ELSE PLAY M5$:GOSUB 599:GO 
SUB 599:GOTO 179 

49 他 ' 迷 差 送 送 甘 差 基 若 基 若 SCORE 

599 LOCATE 33,19:PRINT USING" 拉 提 菩 提 若 " 1 ZS 
:LOCATE 38,13:PRINT USING"##" 1MEW 

519 LOCATE 38.16:PRINT USING"#" STAGE:R 
ETURN 

52M ' 送 肖 療 差 甘 湊 湊 浴 湊 若 QUICK 

539 SYMBOL(525.163) , "DANGER",2.4.6:PLAY 
M2$・Q=9・RETURN 

54  ' 療 半 着 着 基 基 基 療 送 若 GAME STOP 


テッ 
表 個 9 


559 TIME OFF:INTERVAL OFF:LINE(514.152) - 
(639,199 ) , PSET , 】 , BF 

569 SYMBOL(543,169) , "STOP",2.2.6:SYMBOL( 
525,189) ,"HIT SPACE KEY",1.2.6 

579 ST$=INKEY$:IF ST$=" " THEN LINE(514。 
152)-(639,199),PSET,1.BF:TIME ON:INTERVA 
L ON:RETURN ELSE 579 

58 ' 半 半 迷 半 甘 基 ※※ 共 LINE CLS 

599 FOR MTX=9 TO 19 STEP 2:FOR MBX=9 TO 
199 STEP 19 

699 LINE(9 MBX+MTX ) -(513、MBX+MTX+ 1 ) 、PSET 
。g9。BF : NEXT MBX:NEXT MTX:RETURN 

61  ' 類 若 半 ※※※ 基 基 了 え GAME OVER 

629 FOR I=@ TO 2:PLAY"03V19L6DDR32FR64FE 
C" "05V8T255L6FFR32GR64DFE" , "04V5T255L4A 
CD" :NEXT : GOSUB 599:CLS:SYMBOL( 179,.199)," 
GAME OVER" ,4.3,1:1IF ZS>ZHI THEN ZHI=ZS 
639 LOCATE 7,17:PRINT"HIT SPACE KEY TO S 
TART !!" 

649 A$=INKEY$: IF A$=" " THEN GOSUB 599:R 
ESTORE 849:GOTO 49 ELSE GOTO 649 

659 ' ※ 半 光 ※ 基 基 基 基 基 基 CHARACTER PATTERN READ 
& DATA 

669 FOR !I=9 TO 119:READ 
) :Z=FNZ(Z):CX(T エ )=Z:NEXT 
679 FOR I=9 TO 119:READ 
) :Z=FNZ(Z):DX( 1)=Z:NEXT 
689 FOR I=9 TO 97:READ 
) :Z=FNZ(Z) :EX(】)=Z:NEXT 
699 FOR I=9 TO 97:READ 
) :Z=FNZ(Z):FX( 1)=Z:NEXT 
799 FOR I=@ TO 19:READ 
) :Z=FNZ(Z):GX( T)=Z:NEXT 
719 FOR 1l=@ TO 44:READ A$:Z=VAL( "8&H"+A$ 
) :Z=FNZ(Z):HX( 1)=Z:NEXT :RETURN 

729 DATA FFFF,FFFF,FFFF、FFFF,FFFF,FFFF,F 
FFF,FFFF,FFFF,FFFF,FFFF,FFFF,FFFF,FFFF,F 
FFF,FFFF,FFFF,FFFF,FFFF,FFFF,FFFF,FFFF,F 
FFF,FFFF,FFFF,FFFF,FFFF,FFFF,FFFF,FFEFF,F 
FFF.FFFF,FFFF,FFFF,FFFF,FFFF,FFFF,FFFF,F 
FFF,FFFF 

739 DATA 9.9.9.2.9.15.9.AA,9.155,9,AA,9。 
155.9,AA,9,155.9,AA,9,155.9.AA,9,155.9,A 
A,3FF,FF55,7FF ,FFAA,FFF,FFD5.1FFF.FFFA,3 
FFF,FFFD,7FFF,FFFE 

749 DATA 8999,1.4999.7.A899.3F,57FF,FFFF 
。ABFF,FFFF,57FF,FFFF,ABFF,FFFF,57FF ,FFFF 
。ABFF,FFFF,57FF,FFFF,ABFF,FFFF,57FF ,FFFF 
。ABFF,FFFF,57FF,FFFF ,ABFF,FFFF,57FF,FFFF 
。AFFF,FFFF,5FFF,FFFF,BFFF,FFFF,7FFF,FFFF 
759 DATA FFFF,FFFF,87E9 , 7E1 , 8C99.,31,B899 
。1D,E999 7,C999,3,C999.3.C999.3,C999,3,C 
999,.3,C999.3,C599.3.C999.3.C999,3,C999.3 
。C999,3,C999 ,3.C099,3,C999.3,FFFF ,FFFF 
769 DATA 9,.9,7899.1E,791F,F89E,41FF,FF82 
。>7FF,FFE9.FFF,FFF9.1FFF,FFF8,1FFF,FFF8, 1 
FFF,FFF8,1FFF,FFF8,1CFF,FFF8、157F,FFF8, 1 
8FF,FFF8,1FFF,FFF8,1FFF,FFF8,1FFF,FFF8, 1 
FFF,FFF8,1FFF,FFF8,1FFF,FFF8 

779 DATA 9,.9,FFFF,FFFF,FFE9,7FF,FC1F,F83 
F,F9F2.4F9F,E737 、ECE7 , CCB7 , ED33 ,DBB7 , EDD 
B,DBB7 , EDDB , DBB7 ,EDDB , DBB7 , EDDB , D8B7 , EDD 
B,D537 ,EDDB,D8B7 ,EDDB , DBB7 , EDDB , DBB7 , EDD 
B, DBB7 , EDDB, DBB7 , EDDB , D932 ,4C9B,DFFF,FFF 
B,FFFF,FFFF 

789 DATA 5999.,3AC, 1 ,F589.FD,B999, 7E36 , 2A 
9F,8A55,F9C3, 2BFF , 33F1 , 23F ,FF89,7FD2 ,E39 
4。A54C。CAA,A9FF,55D4,BF8A,DA47,.896D,6A15 
,6E55 , 86A9,2AA1 ,559C,14A9,A697,3819,EDCA 
。B759 ,3,AD99,3F5,A991,FDB6,1FE,36AA,DF8A 
,55F9,C32B,FF33,5192.15AB,986A,9244 

799 DATA 1485,4C9C,AAA9.5555 .D4AA,8ADA,4 
599,686A,1544.5586,A82A,A155,C14.A9A6,73 
8 ,1949,4225.5999,3AD,3,F5A9,1FD,B691 ,FE3 
6,AADF,8A55,F9C3,2BFF,3351 , 215,AB9E,6A92 
,4794,.854C,CAA,A955,55D4,AA8A,DA45,968,6 
A15.4455,86A8,2AA1.559C,14A9,A697,3819,4 
942.2599 

899 DATA 7999,797/899F,FF,FF91,1FFF,C67F 
,FFFF , BFFF ,FFFF,FFFF,FFF8,F8FF ,7D5D,5F8F 
。C7C7,C7FF ,FFF8,FFFF,FC3F, 8C7F ,3FFF ,FFFF 
。FFFF ,FC9F ,FFC9 , 7FF,F893,FFFF,7.F899,09,7 
9.7,1F89,FC7,FFFF,F1FF,FFFE, 7FFF ,FFBF ,FF 
FF,FFFF,FFFF 

819 DATA F8F8,FF7D,1DiIF,8FC7,C7C7,FFFF,F 
8FF ,FFFC,73,8929.9.1899.C,9.9.9.9,9,7B8, 
3.EF99.9、18.9.C799.F9,E999.3899.9.8.9,79 
9.9.F899,15D.5999.C7C4,1F,FE99,1FE,3E,7F 
EN 
829 DATA 3F9,3FF,3E1 ,FBFC,FF7F,FF87,FF89 
。1E99,789、1E9.78,1E,7.8991.E999.7F99,1FC 
9.7C9,1FC,9 

839 DATA 9.9.9.9,.4.898,4849.4989.4298,41 
9.29,21.1.9.9。 9.9.9,7C,.787F,FFBF 、FFFF,F 
FFD,FFFE,3FFF , 7FF ,89FF,C91F、E991 ,E999, 4 
9 り ,29,1FF,E383,8794.898,.4849,4989,.4298.41 
9,29,.21,.1.9.9 


A$:Z=VAL( "8&H"+A$ 
A$:Z=VAL("&H"+A$ 
A$:Z=VAL("&H"+A$ 
A$:Z=VAL("&H"+A も 


A$:Z=VAL("&H"+A$ 


〈⑩ み ちゃ ん トマ ト 〉 や まさ き は ん に ん は き さ ま や (山崎 、 犯 人 は き さ ま や ! ) (高知 県 ・ 
に 出 て きそう な セリ フ だ ね 。 う まい ね 。 こ れ は 4 カラ ブラ ム 。 立 


849 『 


差 療 党 半 基 半 基 ※※ STAGE DATA 

859 DATA FFFF,8991,B5D5,8455,AD55,A155,B 
C11,81BB,BC93,FFFF,FFFF,8991,B5D5,8455,E 
DD7,A155,BC11.81BB,BC91 ,FFFF, 3,FFFF,889 
1 ,AAFD,AA81,A2BD,AAB1 ,AA95,AAFD,8891,FFF 
F,FFFF,C821 ,BAFD,AE85 , A3BD,BAF1 .AA8D,EAF 
F,8C21.FFFF,13:′ ROUND 1,2 

869 DATA FFFF,8991.BF7D,8991 ,BAFD,8A81 ,A 
AAD,AAAD,A225,FFFF ,FFFF ,C991 .BF7D,8999,B 
FFD,9A81,AABD, AAAD,A261.FFFF, 7,FFFF ,899 
1 , AAAD,AAA9,AAAB, AAAB , AAAB , AAAD, 8991 ,FFF 
F,FFFF,A221 ,AAAD,AAA9.FFFF ,AAAB,AAA9,AAA 
D,A225,。FFFF,14:′ ROUND 3,4 

879 DATA FFFF,8991.B7FD,B495,85B5 ,B5B5,B 
4B5 ,B6B5 , 8921,FFFF ,FFFF ,C991 ,B7FD,B69D,9 
5B5 ,F5F5 ,B6B5 , B6B5 , 8843,FFFF,19,FFFF,899 
1 , B6DB,B6DB,8993,DB6D,DB6D,DB6D,8991,FFF 
F,FFFF,8991,B6DB,FFFF , 8991 ,FFFF ,DB6D,DB6 
D,9249,FFFF,14:′ ROUND 5,6 

889 DATA FEFFF,A425,ADAD,8181.BFFF ,8183,B 
5B5 ,A5A5 ,A425,FFFF ,FFFF,EC2D,ADAD,8181,B 
FFF,8181,B5B5,B5B5,E427.FFFF, 7,FFFF,899 
1 , ADB5,A925, ADB5 , A4A5 ,ADB5 , 8995,B6DB,FFF 
F,FFFF,C991 ,ADB5 , ADB5 , ADB5 , ADB5 , ADB5 , 899 
1 ,BFFF,FFFF,11:′ ROUND 7.,8 

899 DATA FFFF,8991,B66D,A245,8811,AFFS,A 
3C5 , B99D,8981 ,FFFF,FFFF ,C991 ,B66D,A245,8 
A51 ,BFFD,A3C5 , BBDD, 8993,FFFF, 8,FFFF,843 
1 ,B5A5,B5AD,B991.85FD,B491,A5D5,AC91,FEFF 
F,FFFF, 8431.B7ED,BDAD,B991 ,C5FD,BC91 .A7F 
F,8C91,FFFF,19:′ ROUND 9,.19 

999 DATA FFFF ,C445.9111,BBBB,9113.C445,E 
EEF,C445.9111,FFFF ,FFFF ,C445 .9999,.BBBB,B 
331 ,CCCD,EEEF ,E667,9111,FFFF,13,FFFF,899 
1 , 98C1 , 8C61 ,8631,8319,999D,BB91 .B191,FFF 
F,FFFF,Cg91 ,9CE1 , 9EF1 .8F79.873D,B81D,BB4 
1,B893,FFFF,29: "ROUND 11,12 

919 DATA FFFF,C991 ,C991 8991.8991.8991.,8 
991 ,8991 ,8991,FFFF,FFFF ,C991 ,A223,.8991,8 
889、8991 ,A223,8991.8889.FFFF,14,FFFF ,F99 
1 ,F6DF,F6DF ,F91F,F6DF,F6DF,F6DF ,C81F,FFF 
F。FFFF,F991,.F6DF,F6DF,F93F,F6DF,F6DF,F6D 
F,893F,FFFF, 8:′ ROUND 13,14 

929 DATA FFFF,8991 ,B555 , 9FFD.B2A9,.989D,B 
2A9,BBFD , 8991 ,FFFF,FFFF ,8991 , BFFD, BFFD,B 
FFD,B89D,BBFD,9BFD,8891 ,.FFFF,19,FFFF 、A92 
1 , 8FAF,E8A1 , 8ABD,ABA1 ,A82D,AFED,A995.,FFF 
F,FFFF,E961,8FAF,E8A1 ,CBBD,ABB1 ,AC2D,AFE 
D,B993,FFFF, 8:′ ROUND 15,16 

939 DATA FFFF,8991,.AB65,.AE4D,8C1D,B931,B 
175。A6D5,8991.FFFF,FFFF,C991 ,AF6D,AFSD,9 
E3D,BD79.B8F5,B7F5 ,8993.FFFF , 17,FFFF,899 
1,BE7D,8295,BA75.AA55,A255,BE7D,8991.,FFF 
F,FFFF, 8991 ,BFFD,8385,BBF5,BBD5,A3C5 , BFF 
D,BFFF,FFFF,26:′ ROUND 17.,18 

949 DATA FFFF,8991,45A2.6D22.55AA,553E,4 
5A2,8991,8991,FFFF,FFFF,C991 ,45A2,7DA2,5 
5BE, 45B6 , 45A2.BFFD,BFFD,FFFF , 39,FFFF ,899 
1,A27D,A245,A245.A27D,A241,BE7D,8991,FFF 
F,FFFF,C991.A27D,A27D,AA95,A3FD,BFFF , BFF 
F,FFFF,FFFF,34:′ ROUND 19,.29 

959 DATA FFFF,E991 ,CC99 ,9EBD,B367,B367 , 9 
E3D,CC99,81C1 ,FFFF,FFFF,FF7D,FFFF,FF7F,F 
3E7,F3E7,FFFF,FFFF,FFFF,FFFF,52,FFFF,899 
1 ,B773.8997.A6CD,B39B,B935,AD6B,A6DS,FFF 
F,FFFF,FF7D,FFFF,FFFF,FFFD,FFFB,FFFS,EEE 
B,E7D5,FFFF,59:′ ROUND 21.,22 

969 DATA FFFF ,8991,AAA9,.9555.AAA9.9555,A 
AA9,.B555,8991,FFFF,FFFF,FF7D,FFFF,FS557,E 
AAF,F557,EAAF,DFFF,FFFF,FFFF,53,FFFF,899 
3,。AFFF ,A2AB,A8AB,ACA9 ,AE23.AB27.898F,FFF 
F,FFFF,C991 ,AFFF , ABFF , ACAB, AEAB , AF27 , ABA 
F,A9FF,FFFF,17:′ ROUND 23,24 

979 DATA FFFF,BF91 . 9FDD, 8FDD , 87DD, 83DD, 8 
1DD,89DD,8981,FFFF,FFFF,FF91,FFDD,FFDD,F 
FDD,FFDD,FFDD,FFDD, 8991.FFFF .28 ,FFFF , 899 
1 ,FFF3,8617.FFCD,8919.FF31.8961.AAC1,FFF 
F,FFFF,FF7D,FFFF,FFEF,FFFD,FFF9.FFF1 .FFE 
1,FFC1,FFFF,51:′ ROUND 25,26 

989 DATA FFFF,8991.D555,8991 ,AAAB,8991,D 
555,C991 ,AAAB,FFFF ,FFFF,8991,FFFF,8991,F 
FFF,8991,FFFF,8991.FFFF,FFFF,28.FFFF,894 
5。E945,B87D,8F91 ,8E7D,B845,E97D,C991 ,FFF 
F,FFFF,FF45,FFC5 , BFFD, 8F81 , 8FFD,BFC5 ,FFF 
D,BF81 ,FFFF,37:′ ROUND 27,28 

999 DATA FFFF,8291.83FD,8915.8915,.8915,8 
915,FFF5,C991.FFFF,FFFF,8391,83FD,891D,8 
@15.8915.8915、FFF5,8991,FFFF, 2。FFFF,C99 
1 ,AAAB,AAAF , AAB9 .AAE1.AB81.AE91 ,.B891,FFF 
F,FFFF,8991 ,AAAF ,AABF ,AAF9.ABE1 ,AF81 ,BE@ 
1.F891.FFFF, 7:′ ROUND 29.39 

5999 FOR T=9 TO 59999!:NEXT 


池 浩 后 クン ) 凛 刑 事 な ん と か も の と す / 


メグ ルコ @ 川 


《) 団地 の な か を うろ う 
ろ 動 く 立体 迷路 じゃ 


ここ は 、8 了 建 て の 不思議 な マシ ン 
ョ ン 。 い や マン ショ ン と いう よ まり は ば 財 
地 だ ね 。 

HE NR 
ひと つ ひ と つ 変 な 通路 や 出入 口 を 持っ 
て いる の だ 。 特に 典型 和 な 部 民 の 例 を 
右 の ほう で 紹介 し て な いた の で 、 参 考 
し 

こう いう の は 、 ふ つう 立体 迷路 と い 
わ 札 る も の 。 ち ょ つと まえ に 、 や た ら 
術 誌 て こん な 迷路 見 か けた よね 。 ハ 
シン ゴブ を 時 っ た りな お り だ た だり 、 ド ア を 行っ 
7 に りき た り ide 


ゲー ム を は じ め る と 、 キ ミ は 右上 の 


部 屋 に いる こと に な る 。 ち ょ っ し と 目 立 


つ 刊 線 が キミ の いる し る し だ 。 


使用 する キー は 、 テ ン キ ー。 [1 で 左 
の 部 屋 へ 、[2I5I で 上 下 の 部 屋 へ 、 IS3I で 


右 の 部 屋 へ 行こ うと する こと が で きる 。 


# 

「 及 7 G 疾 今 昌吉 

ン | 見 は 顔 ジ 
で 4 <] 
韻 旧 寺 
い の ん く 番 


_.G ば っ ぴー ! 
ひさ びさ に 地味 
な ゲー ム を 作っ 
た よー ん 。 ヒマ 
8 が あっ た ら 、 や っ て みて ち 
m ょ 。 と いう わけ で 、 迷路 作成 の Sakamo- 
mW to G、 あ り が と さん ! (編集 部 注 ・ 今 
度 は 袋 の な か の .. G で し た …… ツ )。 


HH 上 HI IM IM 2 


閥 が ろ 込 み イ タイプ の 多分 


団地 迷路 の 全貌 。 
ちよ つと 頭 の な ガ で 
シミ ュ ユ ュ レ ー ト し て み 


も ちろ ん 、 
こう と し て も を そ 
AU を が 
2 バン ゴ が ん か が 
な けれ ば いけ な 
いわ け だ 。 
特に 注意 し て 
きだ い の は 、 
木 に あな が ある 
場合 、 下 に お り 
の 06 
PU や つて こと 。 
も う が と つや 、 
移動 用 の キー が 0 の 
> 
この キー は 、 部 屋 の 奥 ( キ | 
ミ か が か ら 見 る と 正面 ) に あい て 
いる 暗 を そう な 通路 を 行く だ め 
の キー だ 。 興 の 通路 は 、 こ の 
団地 の と こ か の 部 屋 に 通じ て 
いて 、 い わ ゆ る ワー プ ブ ' が で き 
なみ 078 HH HH JR 
こう いっ だ あっ ちゃ こっ ち # ri し 則 還 提 
ゃ 移動 の 繰り 返し で 、 な ん と [ 開 剛 相 彰 中 中 則 l り 


か 寺下 すみ の 部 屋 ま で た どり 5 は し ご 。 の ぼり 
つい て ほし い 。 お り が 自由 に で 
見 た 感じ 、 む ず か し く な さき を そう な きま す 
路 だ けれ ど 、 REG あな 。 下 に 落ち 
ず か し い の だ 。 ち な み に 、 最 少 手数 は この 0 
13 手 。 こ れ は 、 作 者 の お 手紙 に 書い て 6 
あっ た 解答 を 数 えん た の だ 。 で も 、 実 際 フー ブフ 通 路 。 ご 
れ ば か り は 行っ 
こ - こ やっ て みる と 、13 手 な ん て ほど と お て みな いと ね 。 
い 。 で も 、 な ん どか この 迷路 に チャ レン SS まあ の 
ンジ し て 、 万 が 一 、13 手 より 少な い 手 ギ な し の 上 ふつう 
数 で あがっ だ た 人 が いた だ ら 教 えて ね / の ドア で す 。 


ーー -OrOSHO> 醒 中 
コーJnC 臣 。 ケ ーー さ OrA 


4 ご 一 し て 、 い き な り こん な と ころ に き て し まい まし た だ た 。 


19 WIDTH89.25:LINE(19.5)-(630,195 ) 、PSET , 
3,B:LINE(11.6)-(629.194) ,PSET,7,B:FORW=8 
9TO86STEP2:SYMBOL(79、W) 、"MAZE MANSIONS" , 
の Os33W-/79iNEXTISYMBOL(600.170)、"。.G”,1.3, 
6 
29 DIM HEYA%(344),HAB%(16) ,HAS%(13) ,ANA% 
(11) 
39 FORW=9TO0344:READA:HEYA%(W)=AENEXT '- つ 
49 FORW=9TO016:READA:HAB%(W)=A:NEXT・ | 
ーー DATA 
S59 FORW=9TO13:READA:HAS%(W)=A:NEXT | 
ZDATA READ/ ノ 1 
69 FORW=9TO11:READA:ANA%(W)=A:NEXT "一 一 
RIVII= mh 4 
1 の 1 
0 DATA =-ー ト 、 ニ 12ー 上 1 。=1。 =1 1638 は 32768 。、9 
> さ 。-16383、-32768.9.9.3。-16383,.-32768 ,0 
16383,。-32768.9、9。3,-16383。-32768 、09 

> う 。-16383,-32768,9 


ぅ > づ 。-16383。-32768.9.9 
ぅ > さ 。-16383、-32768.9.9.3,-16383。-32768 、9 

ぅ > さ 。-16383。-32768.9 

9 DATA 9.、3。-16363、-32768 ,0 0.3、-16383.- 
32/58 0.0、3、- 上 6363。-32768.0 0 、3。=16383 、- 
32768.9。9.3、-16383 、-32769 0 9.3。-16383。- 


な ルアー ド トート 63 の こし さよ ュー よい こも ここ 625 ア っ 
ーー ルー トッ ーー D861 。ー ド っ こも マー ト 。 こ 893。-) 。 こ < 
ーー ルル トッ トール の まま ue 

199 DATA -】。-1.-1.9.9.9.0.9.9.9.0、9.9.0, 
9.9.9.9.9、127,-1。-32768,.0.,6 

1 DAIA 96,1 =327609、9.0.96、1。-32768、0 9 
2926 ルー327606.0.0.96 。1 、-32768 0 9.96 。】 3 
2768.9.0,.96.1 ,-32768.9、9、96.57,-32768 , 06, 
96 449。-32768.0.0.96.3585 。-32768.0.0.9 
6 .26673,-32768.9.9.99,-32767,-32768 , 0 ,0。 
127 


言え な いか ら 、 一 選 3 2 ウタ ラム 。 


ANA2C の …… 穴 の デー タ 
YS 現在 いる 部 屋 の 座標 
54200 押さ れ だ キー の 値 (デー 読み 込 


古 変 数 リス ト み の と きも 使用 ) 
HEYA26 て ひみ …… び 部 屋 の デー タ 還 プ ログ プラム の 説明 
HAB%W め (のみ …… 長 い は し レ ご の デー タタ 10 一 60 デー タタ 読み 込み 
HAS% ぬ (のみ …… 短 い は し ご の デー タタ Um2U0U デー タダ 


210 一 290 マン ショ ン 表 示 


810 一 8660 ENDING 


2 DATA =1。-32768.0. 999、 り 0。1 。-1 、-1 = 
で よー トニ | = ニー, 人 マネ ミッ ー ト マト > つる 1028 
トー トー トー 0 0 6 の 6 
6 9.9.9.9,16382.327567 , 3 -1。-4。16382.327 
57。ー ト 。ー1 。-4.16382.32640 0.32767,-4.16382 
。 う 32649.9 

139 DATA 32767,、-4.16382.32649.9.32767,-4 
16382.32640.9.32767 。-4,.16382 .32640 .0.32 
767,-4.16382.32649.9.32767、-4.16382、3264 
9.、9.32767、-4、16382.32640 

149 DATA 9,.32767,-4.16382.32649.9.32767 。 
-4,16382.32649.9.32767,-4、16382.32640 , り , 
32767。-4。16382.32649.9.32767,-4.16382.32 

649.9.32767,-4.16382.9.9.9.0.16368.0,9,9 
16256、9.9.9、9、15369.9.0、9、9.8192.0.0, 
9.9.0.9.9.9.9.9.9.9.9,0 

159 '--- HASHIGO(B) 

169 DATA -30728.32647、-1921,-39728,.32646 
4231 1921 、-307206.332647、-1921 、-31216、30 
727。-32648、1929.39727,-32647,-8192 

17 “= ェ == 月 ASHIGO(S) 

180 DATA8463,-15856,-991.2112.33。4934.43 
48.8456.16384、-8464.15855.999,-16384,0 
199 '--- ANA 

299 DATA -16384.12288,.192.48,-16384 ,1228 
8.192.48.9.9、9、.9 

219 ニーー も セッ ァ テイ ニー 

229 CLS:FORY=19TO171STEP23:FORX=199TO599 

STEP89:PUTQA(X、Y)-(X+79.Y+22) HEYA%. PSET 
NEXTXA。Y2PAINTI(105.175)、5、1:LINE(99,.16)- 
(589、194) .PSET.!,B 

239 FORW=1TO16:READA,B:PUTQA(AX89+169、D テ 
23+11)-(AX89+165,BX23+24) 。HAB%,PSET:NEXT 
:DATA 4.1.9.2.2.2.3.2.4.2.5.2.5.3.2。.4,4。 
4、5.4.9.5.3.5,4.6.5.6.2.7。.4。7 

249 FORW=1TO16:READA,B:PUTQA(Ax89+158.B※ 
23+21)-(AX89+167.Bx23+27 ) , HAS%, PSET : NEXT 
:DATA 4.9.9.1.2.1.3。1.4.1.5.1.5.2.2.3。4。 
3。5.3。9、4.3.4.4.5、5.5.2.6。.4.6 


ペア 〈《 み ちや ん トマ ト 〉 あか いま い が ガ あ (赤い マイ カー) (北海 道 ・ 金 田 隆 臣 フン) 立 聞 い だ こ と ある よー だ けど 、 確 信 も つて 


表 人 t 


300-800 自分 表示 、 自 分 の 移動 


2 ば 


学 ルプ @ | 川 川 


259 FORW=1TO12:READA,B:PUTQA(AX89+135,B※ 
23+28)-(AX89+154.BX23+39) ,ANA% PSET : NEXT 
:DATA 3.9.5.9.9.2.1.2.2.2。1.3。4.4.2.5,3。 
S ら 9.6,3,6,5,6 

269 FORW=1TO024:READA,B:A=AX89+109:B=Bx23 
+19:CONNECT(A+5,B+29)-(A+T5、B+19)-(A+11,.B 
+8)-(A+11.B+18),2:PAINT(A+6.B+12).9.2.1: 
NEXT 

279 DATA 1,.9,2, 
っ 2 っ 2。 う づ 。2。5。2 ぅ 1 。 
dx っ 人 49 1.6.2.7 
289 LINE(199.9)-(16 ) FPSEH 1:LINE(560, 
193)-(639.184),.PSET,J1ELINE(1。1)-(99.110) 
PSET ,2.B:SYMBOL(19.3),。 "KEY" 3。1.6:FORW= 
15TO095STEP29:READ A$:SYMBOL(19.W) ,A$ も ,2.2 


いう 1 > 4 。 
3 人 
人 > 
, 


り 
い 
7 
9 


GOSUB799:X=269:Y=1092 
599.589.589,620,5209 
GOSUB790:X=180:Y=192 
599.599,589,349,599 


699,669,60909,399 ,609 
GOSUB790:X=599:Y=125 
619.679.619,479,610 
GOSUB790:X=420:Y=125 
639.689,629,589,620 


659,709.639,449,.640 


GOSUB799:X=199:Y=1092: 


GOSUB799:X=349:Y=125: 
649.699,.629,389,579 
GOSUB799:X=260:Y=125: 


GOSUB799:XX=1860:Y=125: 


: GOSUB899 
: GOSUB890 : 
GOSUB899 : 
: GOSUB809 : 


・GOSUB800 


GOSUB809 


GOSUB8W0: 


GOSUB80V 


・ON 


ON 
ON 


ON 


・ON 
・ON 


ON 


・ON 


ンー ウジ ジジ 宅 


G 


G 


> 2: NEXT 
299 PAINT(169,1 ) , 


39 り ' 還 証 昌 JUMF 主題 較 


319 GOSUB799:X=599:Y=19: 


TO 329,379.319.689,319 
329 GOSUB799:X=420:Y=19 
TO 339.389.319.359 .329 


339 GOSUB790:X=349:Y=19: 


TO 349.399 、329 ,7009 ,339 


349 GOSUB790:X=269:Y=10: 


TO 359,349.339 ,599 、349 


359 GOSUB799:X=189:Y=10・: 


TO 369,359,349,320,359 
369 GOSUB799:X=199:Y=19 
TO 369,369,.359,569,360 


379 GOSUB7909:X=590:Y=33: 


TO 389,439 .379,699 .370 


389 GOSUB790:X=429:Y=33: 


TO 389,449.3709,639 ,320 


399 GOSUB790:X=340:Y=33: 


TO 399,459.399,699、399 


499 GOSUB790:X=260:Y=3 は : 


TO 419,469.499,469,40M 
419 GOSUB799:X=189:Y=33 
TO 420,419.409,429,4109 


429 GOSUB799:X=190:Y=33: 


TO 429.489.419.419,429 
439 GOSUB7909:X=599:Y=56 
TO 449,.499.439.749.379 


449 GOSUB799:X=420:Y=S56: 


TO 449,449.439,649,380 


459 GOSUB790:X=349:Y=56: 


TO 469,459.459.659,399 


469 GOSUB799:X=269:Y=56: 


TO 479.520、459,409、490 


479 GOSUB790:X=180:Y=56: 


TO 479.539.469,610,479 


489 GOSUB790:X=199:Y=56: 


TO 489,549,489,710.420 


499 GOSUB799:X=599:Y=79: 


TO 499.559,.499,779.430 


599 GOSUB790・X=429:Y=79: 


TO 519.569.599,579.500 


519 GOSUB799:X=340:Y=79: 


TO 519,.519.599,679.519 


529 GOSUB799:X=260:Y=79: 


TO 539,589.529,.669 ,520 

539 GOSUB790:X=189:Y=79 
TO 549.599.529,739,530 

549 GOSUB799:X=199:Y=79 
TO 549.549.539.759.540 

S50 
OTO 
S60 
OTO 
っ 7 
OTO 


559 559,550,769 ,490 
579.629.569,369,500 


579,639.569,590,579 


きま 


GOSUB800 


・GOSUB809 


GOSUB800: 


GOSUB800・ 


GOSUB890 


: GOSUB899 : 
GOSUB809: 
GOSUB899 : 
GOSUB899 : 
GOSUB899: 
: GOSUB899 : 
GOSUB899 : 
: GOSUB809: 
GOSUB899: 
GOSUB899 : 
GOSUB899 : 
GOSUB899: 
GOSUB899: 
GOSUB890: 
GOSUB899: 
GOSUB890 : 
GOSUB899 : 
: GOSUB899: 


・GOSUB809 


ト =3。J 
・ON 


・ON 


ON 


ON 


・ON 


・ON 


ち ニー ジ ジジ ど っ 


A 


1。1:PAINT(9.9) 5,1 2:X= 
599:Y=19:DATA 二 =5,〒 =2,+ 


G0) 


6⑥10) 


6⑥19 


GO 


GO 


GO 


G() 


⑥6) 


GO 


GO 


GO 


GO 


GOSUB799:X=599:Y=192:GOSUB899:ON AG 
GOSUB799:X=420:Y=192:GOSUB899:ON AG 


GOSUB799:X=349:Y=192:GOSUB899:ON AG 


669,659.649,459.659 
GOSUB799:X=199:Y=125: 
669.669,.659.529,600 
GOSUB799:X=599:Y=148: 
679.739.679.519.610 
GOSUB799:X=420:Y=148: 
689.749.689.319.620 
GOSUB790:X=349:Y=148: 
699.759,690.,379、690 
GOSUB799:X=269:Y=148: 
799.769.799.339 、700 
GOSUB799:X=189:Y=148 
729.719.719.489,710 
GOSUB799:X=199:Y=148: 
29 809,。/10.780 、/20 
GOSUB799:X=599:Y=171 
749,739,739.539 ,730 
GOSUB799:X=429:Y=171 
759.749,.739,439.689 
GOSUB799:X=349:Y=171 
759,759.749.549.750 
GOSUB799:X=269:Y=171 
779.769,769.559 ,7090 
GOSUB799:X=189:Y=171 
779.779.769、499,770 
GOSUB799:X=199:Y=171 
819、789.789.729、.780 
799 LINE(X,Y)-(X+79.Y+22) 、PSET 1.BILINE( 
X-1 、Y-1)-(X+T89,Y+23) , PSET , 1 、B:RETURN 

899 LINE(X、Y)-(X+79.Y+22),PSET ,6.B:LINE( 
X-1 ,Y-1)-(X+89,Y+23) 。PSET,6.B:A=VAL(TINPU 
T も (1)):IF A<1 OR A>5 THEN 899 ELSE RETUR 
N 

981 '@@e@eG@@@ [LND @@e@ の の の の 

829 GOSUB799:FORW=1TO1999:NEXT:CONNECT (8 
9.189)-(99,.175)-(99.177)-(119.177)-(110, 
183)-(99,183)-(99.185)-(89、189).2:PAINT( 
199.189),2.2:FORW=1TO5999:NEXT 

839 CLS:SCREEN7 ,9:FORY=19TO0171STEP23:FOR 
X=9TO569STEP89:PUTQA(X,Y)-(X+79。Y+22 ) 、HE 
YA%,PSET :NEXTX,Y:SCREEN9 7:FORW=1TO109:L し 
O0CATE9,25:PRINT:GOSUB849:TIFW=75THENSCREE 
N7,7:NEXT _ ELSE NEXTICLSEGOTO850 
849 FORL=1TO299:NEXT : RETURN" 
UBI 

859 LINE(199.69)-(549,149)、PSET,2、B:PAIN 
T(9.9).5.2:FORW=129TO126STEP2 :SYMBOL(W,8 
のり )。、 "コーク ロー リマ 7 のり 62NE 人 ICOOLORI3NLOCAIE2O 
>24:PRINT "You are a GENIUS 
ォ オツ カレ サマ 11":EORW=E1TO04:LOCATE9 24:PRINTSTR 
ING$ も (79." "):NEXT 

869 FORW=1TO19999:NEXT:COLOR7 :CLS 


GOSUB899:ON 


GOSUB899:ON 
GOSUB809:ON 
GOSUB800:ON 
GOSUB899:ON 
・GOSUB809・ON 
GOSUB899:ON 


・GOSUB899:ON 


ウ っ どど っ ど ど ど ぢ ど ど ぢ ど ど 宅 


・GOSUB809:ON 


・GOSUB899:ON 


こう 


G 
:GOSUB899:ON A G 
G 


・GOSUB809:ON A 


・GOSUB899:ON A G 


ーーーーー で 


4 本 > 


ea ク 


〈… み ちゃ ん トマ ト 〉 わる い が き が いる わ (悪い ガキ が いる わ ) (東京 都 ・ 小 谷田 浩幸 クン) 如 も つと 長く 、 も つと 楽し い 逆 
言 言葉 を 作 つ て ネ ! この 作品 は 2 カラ グラ ム 。 立 


寺 剰 込み ダイ 240 分 


万 有 引 力 の 法則 で 、 
リン ゴ が 人 を 襲う / 
時 は 『APPLE HUNT ING」( ボ シェ 
ッ ト Vol5) の 少し まえ 。 ま だ リン コ が 
動物 化し て いな いこ ろ に きか の ぼり ま 
す 。 し か し 、 す で に リン ゴ は 意識 を 持 
ち は じ め て いて 、 万 有 引 力 の 法則 に し 


だ た が っ て 人 間 を 襲っ て くる の だ っ た 。 
また 勝手 に 名 前 
科 に ジコ 


キミ は ご 作 ( わ ー、 
を 変え ちゃ っ だ 。 も と も と は 
みた 6 だ さおり で 、 
当然 、 木 を 切る の だ 。 
14 [6 一 で 左右 に 動 
に ンー シン 
お の を 木 に だ だ き ー 
は る 1 だ だ し ん 、 夫 
か ら 1 マス 分 は な れ 
て いな いと 杯 は 切れ な いよ 。 リン ゴ に 
人 0 ご 作 は 死ん で 、 ゲ ー ム オー 

。 て も 、 頭 に きえ あだたら な けれ ば 
だ いじ ょ う ポ な の だ 

リン ゴ の 攻撃 を よ けつ つ 、 木 を サク 
GU つて か ツウ と ひく 。 ク アデ る 回 
本 へ む の を うち お ろ せ ば 、 メ リッ メリ 
ッ ズ ズー ン と 木 が 倒れ る 。 これ 
で よ 面 クサリ ア な ん だ べべ 。 


ae 


! 肛 と ン / 授業 態 
! て 成績 が 落ち て ゆく 。 人 包 
No 1 | 


は きつ と 1 に め あがい が か がい 。 で の ドジ) 
に し て も 。、 ど と うし て も ク リプ の で 
5 
ハガキ くだ きる 

語 SRIIG2 昌 5 
「 ベ ペ ベー シック マスター の 世界 」 


LN I Ii !I II 』 』 IM IT I M WM WM rr 


て て て ご 作 7 け ーー うう う 


し 


上 ーー ハー バー レー マレ パ ーー バー ペルー ャ ピー レー い ー コ ーー バー ペー パレ スー ペレ マエ ーー レー レー い 


唱 ! 7 SCORE 99699 SCORE 


て て て ご 作 7 ーー うう > う 


で ね 、 こ の ゲー ム の お か し い っ る 
と ころ は 、 レ ベル カ が べ る こと 。 還 3 
デモ 中 に [ を 押す と 、 レ ベル の の 
切り 換え が で きる 。 レ ベル に は % フ て 
3 の の の で 、 プロ 、 グマ 上 
の と どれ か を 選べ る 。 さ る て 、 キ ミ ee ーー 
に ef の ) 
か 7 も と も と 、 こ の ゲー ム は わり あ 鋭い 一 撃 。 も うす 導 
いや る し い ほ うだ か ら 、 こ ドジ” を 選ば < ぐ 、 木 が 国 れ そう 前 2 : 
ね ば な ら な く な っ た だ キミ の 体育 の 評価 だ よー。 Hi-SCORE 998888 SCORE に 1 ) 


移 科 (ご 作 ゲ ー ム >〉 ) 与 作 は 木 を 切る 、 ヘ イ ヘ イ ホ ー 
パー に な る と * ご 作 ハ ホシ ニナ リマ シタ と な つて 夜空 に 星 が 1 つ …… う 一 ん 、 マ ンプ ム 。 (古い な あっ う の の 


v イベ イボ 一 の 世界 で みね エ 。 な か な か オモ シロ カツ ダ で す 。 ゲー ムズ オー 


AM 要 ) Hu-BAS!" 


川 川 有明 X@ 


。 オル 

・ ) 木 

> 4 イイ 

e 泥 

NN 少 
生生 が を 人 e お 光 が ス を す の る ド だ 

> ひい 、 ' 

| 2 4 

が 次 水 4 の 

5 れ チ 

エ し . 
9 K ノル 
2 の 間野 」 
9 な な つ な p 
こ に か て 
・ で 本 と どこ 
8 ・ い に つ な ゴ 
し ご づ キ ム 
ンー 二 : まな な ク 亡 
・ 0 人 ーーーーーー 太 ひ (は 
e e @ @e @ @ @ @ @ @ @e @ @e @ @e @e @ @ @e @ @e @ @ @ @ @ @ e ? ん いか な が 
古 変 数 リス ト ・ 画 プロ ブラ ム の 説明 6 
間 ksoetP 当 瓦 ・ 10 一 30 チェ エッ フサ ム 9 
os ズ スズ ゴア 。 40-130 初期 設定 ・ 
Re ・140 一 230 画面 設定 6 
(貞和 ア 2 左右 の 木 を 切 つ だ 数 。 240 一 250 スコ ア 表 示 ・ マ シン 語 CALL * 
に …… リ ン ゴ の 数 ・260 リン ゴ 表 示 6 
MAN…… ご 作 の 数 ・ 270-310 ご 作 移 動 処理 6 
XY アー… ご 作 の 座標 320 オノ 表示 上 
MF-…… ご 作 の 向き ・330 一 350 木 を 切る 


19 CLEAR:RESTORE 749:FOR Z=9TO 5:FORA=9T 

015:READ D$ も :C(Z)=C(Z)+VAL(C"&h"+D$ も ):NEXT: 
NEXT : RESTORE 39:FOR Z=9 TO 5:READ D$:1F 

C(Z) く >VAL("&H"+TD も )THENPRINT"Erorr im "1 
9x*Z+749:END 

29 NEXT 

39 DATA 4EC.547.5DF,813.6FF ,3A8 

49 ′ サク ・ ヶ ^- ム SS59.5.19 

5 "=ー ニ ーーー シヨ キ セッ テイ 

69 DEFINT A-Z:DIM A(255):HI=9: し =9:CLEAR 
&HCFFF :GOSUB 739:GOSUB 569 

79 WIDTH 89:INIT:LOCATE3.5:PRINT" JOY 
STICK ヲ ブ ツ カ イ マス カ  ?2 (Yes..1 or 2.No..9)“" 
89 J$=INKEY$: IF J$= "9 "THENJ=VAL(J$)ELSE 
J=VAL(J$):IF J く <>1 AND J く >2GOTO80 

99 SC=9:MAN=3:K=1:GOSUB 819 


て て て ご 作 7“ーc うう う 


_ 5 il 結 


HI-SCORE 89898989 SCORE 98 


て て て ご 作 7" ーー ロニ うう うぅ 


寺島 NR 
や ど エコ に っ に コ に ピコ デ な の デ 3 1 に 3 る PX そっ コ ご ー に で ご 


HI -SCORE ら Bg9g99 SCORE っ 988 


360 一 400 切り 終わ つ だ と き の 処 理 ・ サム に な つて おり の 、/740 一 790 の 難 デ ー タ ヤ 


410 一 430 ミス 処理 <。 文 を チエ ッ ク し て いま す 。 プ ログ ラム を 
440-540 ゲー ハム オー バー 処理 ・ すべ て 打ち 込み まし た だら 、 か な ら ざ セー 
550-710 PCG 定 義 ・ プ し た の ち に RUN を 実行 し て こ だ さ い 。 
720 一 790 マシ ン 語 読み 込み 。DATA が ち が つ て いた だ 場合 は 、 エ ラー メ 
800 一 950 デモ 。 ツ セー ジ 行 番号 が 表示 され る の で 、 そ 
960 一 990 レベ ル 変 更 処理 ・ の 行 を 訂正 し て あら だ め て セー ブ を し て 
画 打 ちこ お こと き の 注意 。 み ら 、 ゲ ー ム を は じ め て こ だ さ い 。 


この プロ グラ ム の 10 一 30 行 は 、 チ エッ ン 


199 WIDTH 49:CLICK OFF:CLS 4:INIT 

119 P$=HEX$(VARPTR(A(1 ) ) ) : POKE&HD199,VAL 
("&H"+RIGHT も (P$、2) ) ,VAL("&H"+LEFT も (PF も 、2 ) 
) 


129 Cl1=9:C2=9:F=9 

139 POKE &HD192,K:PLAY 7999:SOUND 7.,56 

149 カ ~ メン サク セイ 

159 CGEN 1:LINE(9.9)-(39.24)。" 「。BF 

169 CGEN:COLOR 5:LOCATE 12.9:PRINT "くく < く 
ジタル 2 

179 CGEN 1:COLOR 6:LOCATE 16.9:PRINT CHR 

$(44.45)::CGEN:PRINT" ケ ドーム “ 

189 Q$=STR$(HI):COLOR 7:LOCATE 5,24:PRIN 

T"HI-SCORE ":RIGHT$( "998999"+RIGHT$(Q$.L 

EN(Q$)-1).6)::PRINT USING" SCORE 韻 電 折半 

こい の 


2 の 江 テ ッ ー ( め み ちゃん トマ ト )〉 ん 、 え び が び え ん (ん マ えび が 筐 遂 ) (東京 都 ・ 小 谷田 浩幸 クン ) ※ ん か ら は じ ま る な ん て 、 こ れ は 
昌 面 1 すご い / これ は 3 カラ ブラ ム 。2+3= ニ 5 カラ ブラ ム 。 あ と 半分 が ん ば つて ネ / 


199 COLOR 7:CGEN 1:FOR Z=2TO MAN:LOCATE 

33+Z,1:PRINT CHR$(46)::NEXT 

299 T=9:FOR Z=1 TO19:T=T+2:FOR X=1TO T:L 

OCATE 18-Z+X,1+Z:PRINT"! "ENEXT:NEXT 

219 IF F=9THEN LINE(145,96)-(158.183) ,PS 

ET ,BF .HEXCHR$("99FF5599FFAA") :LINE(1.184 
)-(318,184) ,PSET 2 ELSE PALET 

229 X=1:Y=29:MF=-1:FOR Z=1TO KR:A(Z)=&H32 
13+RNDx16+INT(RNDx8 ) x49: NEXT 

239 FOR Z=1TO K:A(Z)=&H3213+INT(RNDx16)+ 
INT(RNDx8 ) x49: NEXT 

24 "=-ー-ーー MAIN ----ーーーーーーーーー ニ ーー ニー ニーーーーー 
259 CGEN:LOCATE 28.24:PRINT USING" 失 折 
"SCi:CGEN 1:CALL 8&HD999:PAUSE L 

269 IF CHARACTER$(X,Y-1)="#"THEN GOTO419 
279 Z=STICK(J):X1=X:IF ド Z=4 THENX= X- 1 :MF= 
1 ELSE IF Z=6 THENX=X+ 1 :MF= 

289 ITF X<1 OR X>38 THEN XaX_(Z=4)4(2=6): 

MF=-MF:LOCATE X-MF、Y:PRINT" “" 

299 IF X1<>X THEN LINE(X1.Y)-(X1.Y+2) 、" 
":LOCATE X1+MF、Y:PRINT" " 

399 LOCATE X.Y:PRINT CHR$(37+MF、29.31.41 
,29、31.43) :LOCATE X+MF、Y:PRINT CHR$(38+M 

F) 

319 IF STRIG(J)=9 GOTO 259 

329 LOCATE X-MF,Y+1:PRINT CHR$(41+MF) :LO 

CATE X+MF,Y:PRINT" " 

339 IF X=21 AND MF=1 AND C2<5 THENC2=C2+ 
1:LINE(159-C2、179)-(159-C2.173) 、PRESET : S 

C=SC+19:PLAY "07EC" ELSE IF X=16 AND MP= 
-1 AND C1<5 THENC1=C1+1:LINE(144+C1 179 ) 
-(144+C1 173) ,PRESET : SC=SC+106:PLAY"07EC" 
ELSE BEEP 

349 PAUSE 2:LOCATF X-MF,Y+1:PRINT CHR$(3 
2) :LOCATE X+MF、Y:PRINT CHR$(38+MF) 

359 IF Cl+C2<19 GOTO259 

369 FOR Z=1TO K:POKE@ A(Z) 32:NEXT:LINE( 
145.96)-(158、173) 、PRESET , BF 

379 CONSOLE 2、109:CLS:CONSOLE:IF MF=1THEN 
TX=46:R=1:Q=9 ELSE TX=179:R=39:Q=1 

389 LINE(TX,169)-(TX+87,182) 、PSET ,BF,HEX 
CHR$("99FF5590FFAA" ) 

399 FOR Z=1 TO 6:LOCATE 9+R.23-Z:PRINT S 
PACE$(ZxQ)+STRING$(7-Z、33) :NEXT:SOUND 6.、 
39 : SOUND 7.7:SOUND 19.16:SOUND 12.109:SO 
UND 13,9:PAUSE 15:SC=SC+190xK:K=R+1:IF ド 
>28THEN K=1 

499 CLS 4:GOTO 129 

419 LOCATE X.Y:PRINTCHR$(37+MF,29.31.41 , 
29.31.43) :LOCATEX+MF ,Y: PRINTCHR$(38+MF) 

429 PLAY 199:PLAY"V1503G2R6G2R9G2R6E7":E 
=1:PAUSE 10:MAN=MAN- 1 :PALET2.9:PALET6.9 
439 IF MAN>9 GOTO139 

4 洲 人 0 ひら ぱに らら GAMEN 0VBR' ウー ここ こと ニコ っ うら と と 
459 CLS4:INIT:CGEN1 :LOCATE 19.29:PRINTCH 
R$(47,29.31,38,39.29.29、31.41 29.31.43) 
469 FOR Z=1TO 25:PAUSE 1:PRINT:NEXT 

479 POLY(129、19) 、3.6.144.99、819 

489 COLOR 7:LOCATE 12.7:CGEN 1:PRINT".-" 
・・CGEN:PRTINT "人 敗 ホシ ニ ナリ マシ タ 。" 

499 COLOR 4:CSIZE 3:LOCATE 19、19:PRINT#9 
"GAME・OVER" 

599 LINE(79.79)-(239.102) PSET . 1.B 

519 LOCATE 19.16:COLOR 5:PRINT_ USING" YOU 

R SCORE 桂樹 提 提 寺 寺 " 15C 

529 LOCATE 12、18:COLOR 3:PRINT USING"HI- 

SCORE 提 村 上 提 后 寺 "(日 

939、 に 5 し 2 ェ HL MPN MIEOOCMLUOCAIE 7 5 で OL 

OR 2:PRINT"YOUR SCORE 1S HI-SCORE!I!" 
549 PAUSE 49:GOTO 98 

559 '----- PCG テイ キ * ---ーーーーーーーーーーーーーーーー 
569 DEFCHR$(32)=HEXCHR$( "999909999999 
999999009999909009999999909999999") 

579 DEFCHR$(33)=HEXCHR$( "99999099999909 
994992982980420991C7EF6FF6FFF7E2C" ) 

589 DEFCHR$(35 ) =HEXCHR$( "099992209999 
9996EEFFFFFFF7E3C981918029209563C") 

599 DEFCHR$(36 ) =HEXCHR$("993C997E7A7F723 

C3C3CFF9E3A3F7E3C3C99FF9E3A3F723C") 

699 DEFCHR$(37 ) =HEXCHR$("727E7E7E720939 
349404949499293934949494949999303") 


7 ね 7 


P) ホン ト も オ 


619 DEFCHR$ も (38 ) =HEXCHR$( "993C997E5EFE4E3 
C3C3CFF795CFC7E3C3C99FF795CFC4E3C" ) 

629 DEFCHR$( 39 ) =HEXCHR$( "4E7E7E7E4E99C9C 
9920292920249C9C9920292029299C9C9" ) 

639 DEFCHR$( 49 ) =HEXCHR$( "9999C9F73399909 
999999938399999999999C9F939999999") 

649 DEFCHR も (41 ) =HEXCHR$( "3CFFFFFFFF99990 
99999999999FFFFFF3CFFFFFFFFFFFEFF" ) 

659 DEFCHR$ も (42 ) =HEXCHR$( "999993EFCC99990 
99999991C9C0999999909939F9C999999") 

669 DEFCHR$( 43) =HEXCHR$( "FEFFFE7E7E7E7E79 
9FFFFE7E7E7E7E79999999999999999E7") 

679 DEFCHR$( 44 ) =HEXCHR$ も ( "999999999999909 
992759A9999897C9992759A9999897C99") 

689 DEFCHR も (45 ) =HEXCHR$( "9999999999999090 
9244FD44744474499244FD44744474499") 

699 DEFCHR$ も (46 ) =HEXCHR$( "999918FF993C249 
9183C18813C3C2499183C18FF3C999966") 

799 DEFCHR も $( 47 ) =HEXCHR$( "9999999999990999 
り 99999999182418999999999918241899") 

719 RETURN 

72 急 "ーーーーー マン ンコ ~ カキ コミ ーーーーーーーーーーーーー ニ ーー ニーーー 
739 RESTORE 749:FOR AD=&HD999TO&HD95F : RE 
AD D$:POKE AD,VAL("&H"+D$) : NEXT : RETURN 
749 DATA 2A,.99.D1.3A,.92.D1.57.909、90, 4E,2 
3。46.CD,16.D9,23: 'D999 

759 DATA 15,.99,.99.29,F4.C9,2B,3E,29,.ED,7 
9.3E、28.81.4F、39:'D919 

769 DATA 91.94.3E,A9,.B9,.39.96.3E,32。,B8,D 
CO、 20 。/1 23。 7 “D920 

779 DATA 3E,23.ED,79.C9.D9.2A.93.D1 .ED。5 
F,AC,CB,9F.,CB、9F:'D939 

769 DATA 1F,.67,.ED,5F,AD,CB,97.CB,97.6C,6 
7。22.93。D1 ,D9.3A: '"D049 

799 DATA 93.D1,.E6.9F,91.13.32.81.4F,C9,69 
9.99.99.99,99、99:'D959 

899 '"-ーーー- DEMUO -ーー-ーーーーーーーーーーーーーーーーーーーー 
819 WIDTH 49:INITECLS 4:CGEN:LINE( 1,1)-( 
318.198),PSET、1.B:LINE(9,.9)-(319,199).,PS 


ET,4.B 
829 CSIZE 3:COLOR 2:PRINT#9" ーー 
ーー へ 『“ 
839 PRINT#9" | 

細 
849 PRINT#9" em 
ー プ 


859 COLOR 6:CGEN 1:LOCATE 12.2:PRINT#9 C 

HR$( 44.45)1:CGEN:PRINT#9" サ トー ムリ" ECSIZE 

669 CONSOLE 7.19.6.27:COLOR 7:PRINT"・" 12 

CGBN 15PRINT” ーー": 

879 CGEN:PRINT" ブウ コ カシ テ 、" 5 ECOLOR 4:PRIN 

"月 "5 :COLOR 7:PRINT " ブ キッ テク タ * サ イ 。 “" 

889 PRINT"・ リ ヨウ が ワリ カラ "5 :COLOR 3:PRI1NT "5 カ 

イ スプ ツ " ECOLOR 7:PRINT " キル ト 、" 1 ECOLOR 4:PR 

INT" 月 "7:COLOR 7:PRINT" カカ" EPRINT "タオ レ マ ス 。 " 

・PRINT 

899 PRINT"・"i ECGEN 1:PRINT"」- "5 :CGEN : PRI 

NM 、 プア タマ ラコ SCOULOUR 327PRINT ウロ" 1C00R 

PVLN ま 2 3 も DLOR SSPRINT" 3 か 7 

990 COLOR 7:PRINT" ア タル "EPRINT:PRINT" ト 、": 

・COLOR 6:CREV 1:PRINT "GAME・OVER "ECREUV:C 

OLOR 7:PRINT" テ ~ ス 。“" 

919 CONSOLE:COLOR 4:LOCATE 8.18:PRINT"4 
6":COLOR 7:LOCATE 9.18:PRINT#9 CHR も ( 

2 の. CHR$( 28 ) 

929 LOCATE 19,17:CGEN 1:COLOR 7:PRINT CH 

R$( 37.36 29.31 ,41,29.31 , 43) : CGEN 

939 LOCATE 18.18:COLOR 5:PRINT "SPACE KEY 

_5・COLOR 7EPRINT"・・・" の ECOLOR 3:PRINT "CUT 

COEOR ILOCATBE 1 23)PRINTTTLJLEVBL CH 

ANGE " 

949 C=1:CSIZE2 

959 COLOR CELOCATE 6.21:PRINT#9 "HIT SPAC 

E _ KEY" EC=C+1: IF C=8THEN C=1 

969 1I$=INKEY$:TIF 「$=" "THEN RETURN ELSE 

IF I$="L" OR 1I$= "1 "GOTO0979 ELSE GOTO959 

979 COLOR 7:CLS:LOCATE 4、11:PRINT "LEVEI,. 

トン ツマ ター ドド ター スナ 

989 L$=INKEY$:IF L$="9"THENL=VAL(L$)EILSE 

し =VAL(L$): IF し く >1 AND L く >2GOTO 986 

399 GOTO 819 


川 川 補 ダ 人 


お ジッ ⑫ み ちゃ ん トマ ト 〉 ずぶ だ つこ り も り も りこ つ だ ぶす (本 著 作 ひ 、 モ リモ リ 入 つ た ブス ) (東京 都 ・Mr. ペン ペン / 埼 玉 ニケ 
曲 あ 県 ・ 稲 刈 真 青 ) 交 こ の 作品 も 知っ と る で えつ ! 有名 だ も ん ね 。 1 カラ ブラ ム 。* 


ビー ム 発 射 / 


詩 療 が らち 和 み ダ プ の グダグダ 


の YKy ま まり 


この ゲー ム の リス ト を よく 見 る と 、 


種類 の 敵 を 破壊 レ 
つく < くせ ば 親玉 登場 / 

自 機 を テン キー で 8 方 向 に 動か し 、 
スペ ー ス キー の ビー ム て で て 敵 と 戦う と い 
う 、 よ く あ る ゲー ム で す (と 作者 が い 


の の ーッ 3 


上 ア ンド アコ フナ ス が 出 史 と いつ に 
| は 、 中 心 に タマ を 20 発 も あて な いと 破 
『 列 で き な い 。 ア ンド アジ ェ ネ シス より 
も 手ごわい みた だ た い 。 


半分 以上 が キャ ラク タ 設 定 と タイ トル 
画面 作成 で 、 メ イン は わり と ちょ っ と 
し か だ な い 


自 機 が 2 つや られ る と 、 ゲ ー ム オー 
バー。 と ころ で 、 ジ ョ イス ティ イッ ク も 


けれ と ど 、 ダ イト ル み だ い に モ yen ん 、 ほ とんぼ 完 
- ビ ウ ツウ ス っ ぱい 夫人 ルス の 人 リム か) つ ニー ツネ ら >( 0 最近 、X1 に 転向 。 X1 
BY 福田 直人 m て いる の だ 。 の 多彩 な 機能 に 喜び かみ し め つ つ 、 
1 シーン 、 クン E 2 は 4 種類 、 各 10 機 ずつ オール BASIC で で ビ ウ ス も どき を 作っ 
『 うに 。 た の ) 上 和 ei 、 
ゲー ム く らい は 、 か ん た ん な も の に し た 出 だ あ と 、 洋 遊 要 て て くれ た の だ っ た 。 
か っ た 。 た くさ ん の ゲー ム が ある 今 、 わ 
mm か りや すい ゲー ム を 作る の も 、 ひ と つの 
良心 だ と 思う 。 香 
p を 敵 上條 
> 味 を 
1 わ う 
M っ 5 
B て こ た 
ほろ く 〈 
し すさ 』 守 
1 
+ 内 ん 上 ム ひ と し きり や つつ ける 
に ここ ここ ここ ここ “ と 、 敵 の 親玉 が 登場 する 。 


一 変数 リス ト 
SC レア 
の 自 機 の 数 


X( ).Y(C )…… 自 機 の 座標 増分 
BX.BY…… 自 機 ミ サイ ル の 座標 


450 一 470 地面 ス フ の ロー ル 
480 一 540 自 機 媒 発 判定 ・ 処 理 
550 一 560 自 機 移動 

570 自 機 ・ ス コア 表示 
580 一 590 ミサ イル 発射 
600 一 610 ミサ イル 秘 動 
620 一 680 ミサ イル 病 中 処理 
690 一 710 ゴ プ ナス 破壊 処理 


し …… レ ベル (出現 する 敵 の 決定 用 ) 720 一 730 敵 爆発 

G…… 瑞 要塞 の 状態 740 ダマ 表示 

G…… ゴ プ ナ ス の 状態 (被弾 用 ) 750 一 840 敵 出 現 

一 プロ ブラム ム の 説明 850-880 どの 敵 を 出現 させ る ガ 
10-1470 PCC 定 義 890-910 ゴ プ ナス 移動 

180 初期 設定 1 920 一 960 ゴ プ ナス 表示 


190-220 地面 の 表示 
230 一 380 初期 画面 
390 一 440 初期 設定 2 


2 本 ジッ ー 
才 個 * 


春 ノ ン ) 六 こ れ 知 つて る よ 


970 一 1070 難 敵 の 移動 
1080 一 1400 敵 表示 ・ 消 去 


ドー ニー キー (EE ルツ ウー ニー キー ーーー デ ーーー デー で 
29 DEF CHR$(65)=HEXCHR$( "183C3C3C5ABD7E8 
1182424187EDBDB991824243CSABD7E81“") 

39 DEF CHR$(66 ) =HEXCHR$( "994242424242000 


9994242424299999999042424242420099") 
49 DEF CHR$(67)=HEXCHR$( "900929766E04009 
959BEFF7FFEFF7D9A093CC3324CC33C99") 
59 DEF CHR$(68)=HEXCHR$ も ("0193979B112377F 
F9103979B112377FF91139F4F3F3F7FFF" ) 


〈⑩ み ちゃ ん トマ ト 〉 な ん て レ つ けい いこ いい けつ し て ん な (静岡 県 ・CONDORA ン 大 阪 府 ・ 前 清 一 通 埼玉 県 ・ 大 沢 元 
ー だ 。 な ん か の 雑誌 に 載 つ て だ な あ ……。 ご こ ー ゆ ー の は 1 カラ ブラ ム だ 。* 


69 DEF CHR$(69)=HEXCHR$( "89C9E9D988C4EEF @ 579 PRINT#9 " ":CGEN 1:LOCATE X,Y:PRINT 


F89C9E9D988C4EEFF89C8F9F2FCFCFEFF" ) 

79 DEF CHR$(79)=HEXCHR$("FF7723119B97030 
1FF7723119B979391FF7F3F3F4F9F1391") 

89 DEF CHR$(71 )=HEXCHR$( "FFEEC488D9E9C98 
9FFEEC488D9E9C989FFFEFCFCF2F9C889") 

99 DEF CHR$(72) =HEXCHR$( "FFPFFFFFFFFFPFFEFF 
FFF818181DBDBDBFFFF818181DBDBDBFF" ) 

199 DEF CHR$(73) =HEXCHR$( "FFFFFFFFFFFFFF 
FFFF99BDFFFFBD99FFFFFFFFFFFFFFFFFF" ) 

119 DEF CHR$(74 ) =HEXCHR$( "FF999999999990 
FFFFFFFFFFFFFFFFFFFFFF24FFFF24FFFF" ) 

129 DEF CHR$(75) =HEXCHR$( "999999999990909 
007/E7E7E7E7E7E7E7E5A5A7E5A5A7E5A5A" ) 

139 DEF CHR$(76) =HEXCHR$("C3A95252442489 
C3FFF7EDADBBDBF7FFC3A149909999981C3") 

149 DEF CHR$(77) =HEXCHR$( "3C7EC3C3C3C37E 
3C3C46829A9AC23C993C7EC3C3C3C37E3C" ) 

159 DEF CHR$(78) =HEXCHR$( "1898183C7EFFFF 
391919193452B5B5811898183C7EFFFF99") 

169 DEF CHR$(79)=HEXCHR$( "283EFE67E67F7C 
143C62F1B99981423C3C7EFFE7E5F9723C") 

179 DEF CHR$(89) =HEXCHR$( "18181824BDEFFF 
AS1919193CB5B5B5BD18181824BDEFFFBD" ) 

189 WIDTH 40:INIT:CSIZE 3:TEMPO 599:CLIC 
K OFFECLS 4:DEFINT A-Z 

199 FOR I=9 TO 1:FOR J=9 TO 5:PALET J+1, 
り +1:FOR K=5 TO 285 STEP 49 

290 LINE(K、Ix191+JX17)-(K+39,IX191+Jx17+ 
11939 PSETJgt1.B2NEXJ KJ 

<19 FOR I=-2 TO 318 STEP 49:LINE( 1 ,-5)-( 
1+4 299) ,PSET 7 、B:NEXT 

22Z9 FOR I=9 TO 6:PALET I ,1:NEXT 

な は 旨 RM ニーーーー シヨ キ トッ 

249 COLOR 4.1:CLS:PALET 7,1 

<SO9 PRINT 半 0 「 還 還 am 央 目 間 = 上 明 朋 間 昌 昌 較 

26 り 9 PRINT#9" 還 回 回 。 生還 2 位 回 

</9 PRINT#O' 王 mm 間 mm 肖 語 交 、 還 = 

289 COLOR 7:PRINT#9 


299 PRINT#9" BY NAOTO.F 
309 PRINT#9 " エーーーーーーー Ep Ia Pa ye 
319 PRINT#9"1 SPACE | 1718191 
329 PRINT 村 9 "トーーーーーーー フ トー キー キー 
339 PRINT#9" 141 16I 
349 PRINT#9" +ー キ オー トー 
359 PRINT#9" よる 13| 
369 PRINT#9" ーー 


379 IF INKEY$>" "OR STRIG(1) く <9 THEN 379 
389 IF INKEY$=" "AND STRIG(1)=9 THEN 389 
339 REM-ーーーー ショ キ セッ テイ ーーーーーーーーーーーーーーーーー 一 
499 RESTORE 419:FOR I=1 TO 9:READ X,Y:X( 
1 )=X:Y(] )=Y:NEXT 

4 よび DAIA 2 2 0 うつ 2 2 。 こ 2.0、0.0、 2 の,。、 = のり 。 
ーー ニク クッ テク 

429 PALET 7,.9:SC=9:KZ=1:L=9:V=2:P=g 

430 X=18:Y=14:BX=18:BY=-1:G=9:FOR 1=9 TO 
7:T(T)=1:NEXT :T=9 

449 COLOR 7.1:CLS: PLAY"O5E5DC5RCRCRE7F9 

04:O03E5DC5CCCCRE7C7EFO04" 

459 REM スク ロー ル 

469 PALET P,1:P=P+1:TF P>6 THEN P=1 

479 PALET P.9 

489 REMーーーー シ ~ フ トン (内 ルキ ー リ ) 一 一 ーーーーー 一 一 

499 LOCATE X,。Y:FOR 1I=9 TO V:IF T(1)=1 TH 

EN 559 

S99 IF T(I)=6 AND ABS(Y-E(T))<3 AND ABS( 

X-18) く 11 THEN 539 

S19 IF.D(1I) く >X THEN 559 

SZ0 1]P E(1) く >Y THEN 550 

S39 COLOR 3:LOCATE X.Y:CGEN 1:PRINT#9 "A 

PLAY"B9CRRR" ECGEN: IF KZ=9 THEN 220 

S49 KZ=9:GOTO 439 

SS59_ NEXT:K=STICK(9)+STICK( 1 ) :M=X+X(K) :N= 

Y+Y(K):IF M>1 AND M<37 THEN X=M 

S69 IF _N>1 AND_N<21 THEN Y=N 


や 化学 の 時 間 に 聞 け そ うな 一 言 だ ね 。 〆 カ ラグ ラム 。 


ペア 〈《⑰ み ちゃ ん トマ ト 〉 ち つ そ は そつ ち ( 室 友 は そつ ち ) (二葉 県 ・M5 の パッ フ ン ) み シ ョ ー ト トマ ト で すね エ 。 な ん が 理科 


表 何 * 


9 "AP":CGEN:LOCATE 2.9:PRINT 失 9 "SCTiSC 

DO KEIM ーー デー タマ し パラ スタ ェ ) ニ ーーーーー ニ ーーー 

S99 IF BY=-1 AND STRIG(9)+STRIG(1) く 9 THE 

N BX=X:BY=Y+2:PLAY"C9:B9" 

699 IF BY=-1 THEN 759 

619 LOCATE BX,BY:PRINT##9 " "EBYEBY-4:IF 

BY く <9 THEN BY=-1:GOTO 759 

629 FOR I=9 TO V:IEF T(I)=1 THEN 749 

639 IF D(I) く >BX THEN 749 

649 IF ABS(E(IT)-BY)>2 THEN 749 

659 LOCATE D(I)L 上 E(I):CGEN 1:PRINT#9 "CTPI 

CGEN 

669 BY=-1:IF T(IT) く <6 THEN 729 

679 IF G=1 THEN 759 ELSE PLAY “"A9+B" 

689 IF G>2 THEN G=G-1:GOTO 759 

699 COLOR ,2:PLAY"R9E-BC" ESC=SC+ 29:N=V:V 
=7: エ =1:L し =9:IF N=7 THEN V=2 

799 FOR I=9 TO 7:TEF T(I) く >6 TK(I )=1 

719 NEXT:COLOR ,1:CLS:G=1:GOTO 899 

729 PLAY"R3+TC1+TB:-C5" ELOCATE D(I),E(I) 
739 T(I)=1:PRINT#9 "の ESC=SC+1:GOTO 7560 
749 NEXT:CGEN 1:LOCATE BX,BY:PRINT#9"B" 
Nm の mm アー の ーー テー テー 
769 CGEN:IF P>1 THEN 859 

779 FOR I=9 TO VIE T(I)=1 THEN 799 

789 NEXT:GOTO 859 

799 T(IT)=INT(L/19)+2:L=L+ 1 

899 IF L>39 THEN IF G=9 AND 1I く 3 THEN G=2 
1:T(I)=6:D(I)=18:E(T)=-2:GOTO 859 ELSE T 
(IT)=INT(RNDx3)+3 

819 D(I)=INT(RNDxX17)x2+2:E(1)=9 

829 IF T(I)=3 OR T(I)=5 THEN E(1 )=22 

839 IF T(T)=3 AND RNDx9 く 3 THEN D(1 ) =X 
849 LOCATE D(I),E(I):CGEN 1:PRINT#9 CHR$ 
(75+T(T) ):CGEN 

98909 EEMー ニ ーーー テキ 

6869 T=T+I:IF T>V THEN T=9 

879 IF T(T)>1 AND T(T)<6 THEN LOCATE D(T 
),E(T) 

889 ON T(T)GOTO 459.979.1919,1939,.1960 
899 REMーーーー テキ (フラウ ヨウ サイ アン ト ^~ ア コ ~ ブ ^ ナ ス ) 
999 IF G=1 OR E(T)<7 THEN E(T)=E(T)+2:IF 
E(T)>27 THEN G=9:T(T)=1:GOTO 459 

919 NsE(T):COLOR 5:IF G>1 THEN COLOR 7:P 
1 人 

929 CGEN 1:IF N>3 AND N<27 THEN LOCATE 8 
5N-4:CGEN:PRINT#9 SPC(11):CGEN 1 

3939 IF N>1 AND N<25 THEN LOCATE 8,N-2:P 
RINT#9"DHEKDKEKDHE" 

949 IF N>-1 AND N<23 THEN LOCATE 8,N :P 
RINT 失 9 "HIHIJLJIHIH" 

959 IF N>-3 AND N<21 THEN LOCATE 8,N+2:P 
RINT#9"FHGKFKGKFHG" 

969 COLOR 7:CGEN:GOTO 459 

9/0 REI-ーーーー アギト だ 0 ウニ ーーーーーーー デ ーーーーー 
389 IF E(T) く >Y_OR ABS(D(T ) -X) >3 THEN E(T 
)=E(T)+2:IF E(T)>23 THEN 1109 

999 N=D(T)+INT(RNDxX3)\2-2:IF N>1 AND N<3 
8 THEN D(T) =N 

1999 GOTO 1989 

上 0 RERM ニ ーー チキ 2 (デル ダリ ーーーーーーーーーーーー 
1929 E(T)=E(T)-2:IF E(T)<9 THEN 1199 EL 
SE 1989 

愉 き の RM ニー デー ンプ の 生き (コー ニュー テー て ーーーーーーーーーー 
1949 M=D(T)+SGN(X-D(T ) )x2:N=E(T )+SGN(Y-E 
(T))%2:IF SCRN$(M,N,1)="C" THEN 1989 
1959 D(T)=M:E(T)=N:GOTO 1986 

DOU REM ニ デー) グフ カー クリ ーー デー テーーー デ ーーーー 
1979 D(T)=D(T )+SGN(X-D(T) )x2:E(T)=E(T ) -2 
・IF E(T) く 9 THEN 1199 

OU REM ニ ーー グー アーーーー ニ ーーーーーーー テ ーー ニン ニー 
1999 PRINT#9 " "iLOCATE D(T),E(T):CGEN 1 


・PRINT#9 CHR$(75+T(T) ) :CGEN:GOTO 459 
1199 T(T)=1:PRINT#9 " "EGOTO 459 


レル / 


川 ※ 久 


M や 中 ( ) karise: 


X,.Y…… 王 サイ ル の 奉 標 


XX sy ecs 


EGR や つつ け だ モン スタ ダー の 数 
回 の の モン スタ ー の Y 只 標 
ws モン スタ ヤー の 進行 訪 向 


mm モン スマ ヤー の 座標 (ボー ナス スズ 


ーー M〆Z-1500 で も 動き ます 。 だ だ し 、400 行 と 

(あし や の 気球 の 座標 560 行 は 、 削 除 し て ぐだ さい 。 ご この 行 を 残 

eee キー 入力 し て お ぐ と 、M〆-1500 で は 野 走 し て し ま 

WW へ ヘリ の YY 座標 いま す 。 も し 、 野 走 し て も わし ゃ 知ら ん 

田 プ ログ ラム の 説明 けん ね 。 (エイ キチ ) 
10 一 100 REM 文 


上 見 朋 見 介 計 見 月 見 思 胃 見 四 先 更 思 


る 
| 
記 】 衝 未 才 
ー ん ば ん は 、 宮 後 秦 孝 で す 。 今回 の ゲー 
妥 ム 人 は 、 キ ャ ラ が いい と 思い ます 。 キ ャ ラフ 
ョ だけ 抜き 出し て 使う の も よろ し いか 、 と 。 - 
上 お っ と 、 時 間 だ 。 て 4 よ 、 きけ げん よう 。 
W ( 綿 集 部 注 ・ 町 は す 邊 
ニル er で へ ヘリ コク スー を EE で に 使い 古 し で す ) 『 
避 o_ ーー ~ ミ アミ 二 。 委 | で と の く - 重 
ゃ やつ ぱ り 、 こ の モン NNN 027005 わた し が 総理 『 
プーm ン ーー リー ノド S 
/e 2 、 在 剛 で こ に くら し く 動 (モン スタ ー に 員 な ん て いっ ! 
の ダー、 エイ 年 チ 挟 ぶち あて よう 。 ミ サイ ル は 、 カ ー ソ ル  W -。 ] ”「 
ペニー を い 2 こ ヽ テー エー- ) こ 1 \ 
公 回 、 総 理大 臣 に 選ば れ た 宮 後 くん キー て 謎 導 で きる け と 、 1 て な いけ ど ) ェ 
の 最新 作 。 ゲ ー ム 盛り あわ せ 定 食 。 お 洛 あ 6 の が の 6 湯 電 00 て 0) 
点 に な る が か が (ミサ ザイ ル が は ずれ る と で マ 5 匹 た な なす と 、 そ の だ びに ボー ナス ス 
上 110 一 120 初期 設定 1 オイ サス 点 )、 気 計 テー ジ 。 カーソル キー で 照準 を 動か し 
Mk ミュ ー ジ ッ ク 130 一 190 キャ ラン クタ 定義 ' 2 
に NB の 200240 時 0 や 時に 3 回 あ た て 。 モン スズ ダー や っ つ け ほ うだ いな の 
人 ee 区 当 ア め 250 一 300 ゲー ム 画 面 5 > 
H…… ハ イス コ フ 310-330 へ ヘリコプター 移動 ・ 和 表示 2) 0 2ISc ギン ググ 
M…… ミ ス の 回 数 340-400 ミサ イル 移動 ・ 表 示 ミー。 の 宮 後 くん だ ね え ぇ 。 
R…… ラ ウン ド 数 410--460 モン スタ マー 物 動 ・ 表 示 0 ' 
470510 気球 秘 動 ・ 表 示 モン スタ ー を 


520-530 ミサ イル 命中 処理 
540 一 580 モン スタ ー 命 中 処理 
59 ひ 730 ボー ナス ズラ ウン ド 
740 一 760 ミス 処理 
770 一 790 ゲー ム オ ー バ パー 処理 
800-850 タイ トル 表示 
較 MZ-1500 ユ ー ザ ー の だ め に 

ご の プロ グラ ム は 、MZ-1500 用 Hu 
BASIC Ver2.0 (別売 ) を 使用 すれ ば 、 


ミサ イル の 旧 卒 標 


モン スタ ー の 旧 座 標 (ボー 
スス テー ジ ) 


1 1 本 手近 指 拓 拓本 皇 


づけ の" ーーーーーーーーーーーーーーーーーーーーーーーーー5 

ca す 。 較 -BQL ON-EOUHHHE ド ーーーー _ 半 

介 け は “ 滞っ ーーーーーーーーーーーーーーーーーーーーーーーー 論 

呈 り "。 還 一 ーーーー ド ロロ ドー ゴ 1Zー ア 0( 1 

DE ニ ーーーーーーー 0 

7 ウロ" 園 一 一 -BYーY 。 MTYAUBHTR ロ - 笠 

BOO 7 誠 - 

っ 0 ・ 本 5 打 3 可 3 本 李 3 押 3 枯 : 拓 手提 

1 C) 

1 や ここ ーー ニー 509 寺 や ゅ w チ イ 1 で ーーーーーーーー… せ だ さよ 


12O DEFTNTA-Z: SFEEDOEFLAY7E TNIT"CRT ェ "EU ま = リオ に 日 哲生 補 は は 社 F F EE 拉 D D 拉 じ " 
13Q "ーーーーーー キャ ラウ ター そま 


140 日 =" 
150 H$(O)=" ド E ズ メメ 3 ドス スス ネ ヌ ミー 詳 。 ド ヌ エネ 3 = BE 式 3 

160 日 $(2)= リ 区区 半 3 称 区 | 関 N ド 称 区 宇和 認 3 り 

170 M$ も (O) =" 人 
1BO NM$(1)= リ し と で と と そ で し たと で そそ で と そそ と し で と と と と し と と と と と で 
190 M$(2)= リ し と ここ と で < 議 議 時 で で こと で 半 入 和 0 科 で こと に に で 還 計 基 よ と ここ 半生 着い に ここ ここ 
0 Se ャ ~6 ズ ワ ー ト 馬 SS 


〈BALLOON BOMBER>〉 自分 の ヘリ か ら モ ンス ター めがけ て ミサ イル を 発射 する ゲー ム 。 地 球 や 地上 の 建物 に ミサ 
イル が あたる と ダメ 。 よ く あ る よう な ゲー ム だ けど 、 な ガ が な が 楽し め る ゲー ム 。 


プロ 77 ム 


か > (e 


で で 0 | ーーーーーーーー ヨコ キサ "ヒョウ の 信子 T ーーーーーーーーー 
で う けり メニ テ 48 ニモ 1 で YY マニ MM+ す で ロア テニ 1 5 =1 3 ロニ RND*\ 1 旨 + す 1 』 ビ =1 
<40 FOURT=1TOBI 人 a( エ ) = エキ ロロ + ダ sB(E) =RNDK11+42IC(T)= ニ ー1gFHR ゴ =1TO RNDK2EC(T) = テー ビ (T) : NEXTJs 
MEXT 1 
の けつ ーー ーー ーー 
= ら 60 INIT"CRTI "ECLGI COLOR 1 
270 LODEATEOG』S1EFRTNT リ キー コー ロキ オロ エコ オー ロロ オー ペロ オー ペー ロロ キ m ロ I ロ IT ピ 1111H ピロ ト 
人 NPDENEEHRRES3I 則 HURIGE ロ EE の PRE PS 
<B0 FDRI=1TUSIEO ロ LDRT ELOUCERTE 人 (IT)。B(I)EFRTINTE ま 』gNEXT1 
<70 CULLURZ7EFRINTUSING "回 [ GDHRE = 拓 柱 打 栖 揚 ] [HT エ ー ロ ロビ ミ 提 相 韻 韻 韻 ] [MIGGI#J"IGIHIHi 
300 LUDCERTEO EE48FRTNTUS TNG "ERUDUND: 手 ] EEBRALHDN BHHBER] [MINGTERI 提 1]" ョ RI ローL ュ 
さり リー ーーーーーーーー の は ココ 39 - ニー ーーーーーーーーーー- 
さと いけ 二 ま =INEEY ま (07 は 内 還 (芽生 = り 還 "人 折 ND ME12ー( まり 本 "人 ND ME16) ETF ] ま = リリ "QRND X=4 X=5sFLAY" 
に 4 キ に 
さ づ さけ アテ デーgI LHCERTEG。 MECDLDREIFPRTMNTH ま (アメ +1) 
3 て ニニ ニニ ニー ニー ニニ ーー ニニ サコ ゴル. 
さろ つの 0 TF  X 三 人 4 YY テニ M+ す SS BDTD40G 
=6G Y1 モ YE X1 ニ XY テニ Y 二 (中 = モリ 馬 リリ)ー( エ 本 = リ 本 DiTF RND*ESL YY+TRND ネ で ー1 
さ ア 0 TTF Y 1 Y ミ 1 
SBO_ LUCRTE X1aY1IFRINTU "aaX ニ X+15 ITF XE コ ワウ 5=S-5OEFLAY "CD7C5" 5 1F SSOD GEOEMN= さ ュ XX テマ 
GUTUGSOELL GE メニ オミ Y ア = 内 せ 2 ロロ T ロ で の 
の 」 COLDR7: ら ま = じ C じ HRPRCETER も (XaY)sLHERTEX。aYEFRTNTU。 "ag TF G ま SO "BHTD 5 さ O 
革 000 UKE み H ビ ア ヒ ュ マコ ロ ュ マコ ロロ 5 LLSHCG 
介 1O ーーーーーーーーー セコ プ グ ーー ニー ーーーーーーーーー > 
4 で 0 上 FX と ココ ゴー し ニー ビ =SBN (ヨーY) ETF じ = り ロロ R EE1 =1 ELSE 生生 
4 さけ TF RMNDE。 呈 ビ = テー ビ 
中 生日 ニ ロ + じ ミロ モロ ー バ (HE 1) す (HH:1) 
O CDLDR4ELUCRTE3 人 SEEFRTNTNM ま ( ア ィ 1)』 
全 ら り 0 CHAR じ TER も (XaY) う ETF XXE 和 4 QRND DE 0 。 り AND D ま リリ イ THEN 王 ミミ O 
人 44 7 ーーーー キキ ュー ニーーーーーーーーーー 
4BOD J=GIMHILEJEEUIEB(R7 EE(R)+T じ (R)ITF BC(RD で で B(Q)mSIC(R)=1 ELSE 1TF B(a):1 昌 BE(Q) =1 王 
s じ (a) テ モー1 ELSE IF RNDE。 ヨ CC( 本 ) ミー ビ (人 ) 
470 LOUCRTE 人 R(R)aB(R) CDLDR 人 REFRTINT Bi ロロ 1 TF 台 : 王 和合 =1 
200 ITF 人 4 人 ND CHARACTER ま も (XaY)E EPS TaND CHaRETER ま (XaY) で ドリ ツリ THEN 5 
1 () リー = り +1 8 MENDE GUTUHSSGO 
で 0 ーーーーーーーーーー イル 用 "で 太 分 ーーーーーーーーーー 
っ 5 LODCRTE XaYiCDLUR6IFRTINT" 寺 "agBEEFPETF XSB 人 aND XE る 1 RND YE で 1 ELSE 7550 
iP 9 た が ・ は PU が ーーーーーーーー 
っ oO LUCERTEX。Yー1EFRTINT "日 屋 業 上 相 当 3「s 
うら FOR IT=OT ロ 2 FUEE&HC ァ C ビ 、 Ta TECRLLLHCSOEI NE XT エ 
ウ Z ウ 9 LUERTEXー1』。 Yi ELLHR7 ェ FRTINT "10O" si ロニ 5+1008 FARUSE5: BEEFOI し = テヒ + 1 
っ 20 TF 上 GOT ロ OO _ ELSE 80 
ヴ ヴ (0) 小 - - ナ マー タコ コト ーーーーーーー 一 
ら 60 IMITPCRTETEEODLHR。1ECLSI GBDSUE プ 3O0 X=19 の 3 Y=10: 仙 19: フロ =1:』 に =1』Z ア =1gLUDCRTE14。10I PRINT 
"BUNUG_ ROUND "si IPAUSE10: GUHGUB ア スミ) 
610 FURJ=1TH3OOI LUHEARTEG。 で 4 は EDLDR7。 衣 FRTNTUS TNG "EGGCURIE s 提 提 韻 音 井 ] [TII ブ Ei 拓 析 幸 ]"GI ズ OO 一 
Ji : BEEF 1 
ら 6 どい ロー ロ I ロロ オ すじ ITF GE 1 仙 =15 ビ =1 ELSE 1】F さそ = ささ 5 じ =ー1 ELSE IF RND:。 日 ヒ = ミ ー ビ 
らら うり BEEFO H1 = 日 ーB+RND ロー1 ミロ モロ ー (HE 1) ま 人 G+(BE1 フ ) * つ 
ら 6 人 4) COULURRND6+1 GELUERTE 人 1』E1:FRTINTM ま (1) iiELUCE 人 RTER。 EEFRTNTM 和 (メキ 1 ) 』』 ア ニー ア 
ら コ ロリ 1 生 ーTNEEY ま 【( け ) 1X1 モ Xs Y1= ニ Ys X ニ メオ (も = リ "回 "RND XE1) 一 (1T 和 =" 認 "aND でき) ミヤ テモ Y 二 (芽生 = リ 較 "RNND Y 
キッ うー( 1 まり 本 MD YE の) 
66o IF XX1 AaND Y=Y1 ELSE COLQ ロ R』 1 LUCRTEX1。OEFRINT" "igLDCATEX1.。 SEFRTNT" の 生き た 放 。 
aaTEOaY1EFRINTU "asLHCATE さ 9。Y1sFRINT" す ョ 
ら 670 COULURE』 ア 7 ェ LUCRTEX。OEFRTINT#07 凍 "igELOUCRTEX SSEFRTNT#0" 遼 "LHCRTEO。 YsFRTNT 柱 0" 悦 「5 
LOCRTE3 の 4YEFRTNT# 品 " 較 "iECHLOR』O 
68D TFT 和 ま = り リツ THENCE ロ LORE5E IELGE7 1 
67 5 まじ HRRRCETER 生 (Xa。Y) ELOERTE1。YsFRINTSTRTING ま (BB。 "ysELDERTEX 。1sFRTINTSTRINGB ま (で ら 
1 症 語 Da iLOUCRTEX。 Ys FRTNT" "ss BEEF 
700 TFB 和 ま =" "BUSUE73O ELSE CULURSELOUCATEX』Y-1sFPRINT "1 尊 要 一 概要 "ssPLAY"C1CDEE- ロ ー6 
じじ CT GE ロ + ロ 03 GUHGUB ア ロミ ロモ RND る ロキ 1 は RND*16+1 
7106 NEXTJEILUCATEO。 で 45 EDLUDR7。 SEFRTINTUSTNG" [GSCURE = 欄 韻 提 井 揚 ] LTIPHE: りさ 3 まさ ミ PELNYTES2DE 
EDCEDEDEDCE ロ + オ 6 る "ミレ ヒデ ロミ ロモ リロ + ナ 1 5 ドモ ドド +1 8 TF ロジ 呈 ロニ 45 BUTO2GEOEL GE で うさ 
7EO GOUSUB73O05 FUR エ = さら 6TODSO 
7Z30 CODNS ロ LE 1。 SG 1。 さ BI CHLODR。 OsELGSE TNIT "CRTE "sRETURN 
アプ 人生 0 | ーー ーーーーーーーーー 用 リー ーーーーーーーーー 一 
ZS0_ FRAUSESEFDRT=1TD1SICOHLOR』。 SICLSEFLAYMTD ま (用 。T* キ コー1、G) す 91"sCODLDR』。6ICLGIPLAY"ー ビ リュ 
NEXTTECOHLUR プ 7。OECELGEFLY リー ロリ 
6 RS IF MM ふう BUDTD で う 3 の 
デメ ルリ ーーーーーーーーー- サーー ム 計 - 呈 " 
7BO 人 ENHISN DVER "5EFLAY"ー ビ ラリ 
ァ ワ 0 PaAUSE 10ITF HG H=Gs GOT ロ 2S1O0_ ELSE2S 1 
BOO 『“ ーーーーーーーー ヴィ トル ーーーーーーーーー- 
d190 INITVUE じ RTE DECLGI エ =1 8 BEEP 
BEO_ じ OLOR エエ テモ)+ オ 1:TF 1T=B 1=1 


空 り ソン ジル の 
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BSO FRINT" 画 、 、 還 オオ 、 ト | 男 、 ゴ 、 し 1 暫 、 男 還 、 2 回 回 | 回 障 | 較 | 男 | 回 較 | 韻 | 国 
間 / 較 間 半 、 還 | 還 還 | 半 | 半 | 還 、 較 | 較 | 還 、 問 還 、-、/ 且 / 還 | 国 ンマ ン 還 | 還 て 回 | 問 
間 還 | 
8346 FRTNT" BY BY.M 四 1YRUSHIROD。 本 "sgFRTNT。 "ミーHITT ANY EEY ! ょ 本" 
90 IF INEEY ま も (D) = "リロ HTOBSOELGSERE TURN 
補 ッ ビ 〈⑰ み ちゃ ん トマ ト ) りか が カ り (理科 係 ) (埼玉 県 ・ 飛 田 過 彰 フン) 35 コ の 作品 を 送っ て き て くれ だ うち の 1 つめ 。 小 中 Z 


表 個 19 


学校 で は 理科 係 つ て ある ん じゃ な いか な や ご こん な に 短い けど 、 再 発見 し た か ん じ だ か ら 3 カラ ブラム 。 


N、N や SN 
WAN 、、 NN 
5 ゞ 。 人 NNNNNNT 
誠 差 が 込み タプ ム 79 夕 NN 
ト の U2 ら 。 
る と 右 へ 進む こと し か で き な い 。 そこ ろ わ な いと 、 や っ ぱり キミ は 死ん で し 
語 で 、 チ ャ チャ (キミ ) は 、 カ ー ソ ルキ まう の だら 
に ハー ト を 取ら せ ] SS 
Q ! 0 の に 上 ャ ー で 移動 し 、 ブ ロッ ク を 動か し て 、U ハー ト を 10 個 、U 2 に 取ら せる と 面 
る の が CHA-CHA 2 に ハー ト を と ら せ て あげ よう 。 た だ クリ ア 。 長田 が だ ん だ ん 速く な る ぞ 。 


RUN し て な に か キー を 押す と 、 ゲ ー E、 と ぶつ 


ム ス タ ー ト で す 。U 2 (黒い に ニコ チャ か る と 、 キ ミ は 変 数 リス ト ・ 還 プ ロブ ラム の 説明 

うら る 4 に AM ハイ スコ ア ・ 10- 40 初期 設定 
ン ) は まっ す で 進 み 、 な に か に ぶつ か ゲ ジ ドド 6 スコ p 。 50 一 100 画面 表示 

を それから 、 長 ME…ーC ビ ロム Aー ビ HA の 数 。110 一 150 CHA-CHA の 移動 処理 
ヤ い ちゅ 6 K…… 長 田 君 CX) の 位置 ・ 160 一 210 U2 君 移動 処理 ・ 判 定 
の る か じ 田 ( 火 ) が マコ チ Tl …… 長 田 君 の 動 ご 割合 ・220230 長田 姓 CX) の 衝動 処理 
エナ まっ 、/ ュ aa ムトー OOHA-CHA の 位置 ・ 240-260 ハー ト を こつ だ と き の 娘 理 
ミヤ えと ャ ン ( 大 ) の と こ 日 ……CHA-CHA の 進行 万 向 決定 用 ・ 270--290 面 フ リア 
チ て 待 み に で る 2 に G…… い U2 君 の 進行 方 向 決定 用 。 300-330 ミス 
F…… り 2 君 の 位置 ・340-350 画面 ス フ ロ ー ル 

ト U 計 ママ ハー ト を 10 個 ひ ・ 360-490 デモ 画面 
を の グ 画 き 
は ほど だ 
< プア の 5 
ワリ | 


10 DEFINTA-Z』DEFFNR(M〉)=INT(RND ( 1 ) *) 

2 HBH(1) = テー40s HB(2G)=1:H( 衣 )= モ 403 日 (44) ニー1 : HG=O 

3 あり DO SC じ =O ME= テ ミミ T エ 1= モ 1005 BDSGUB う 7 

人 40 CULUHR ロ 。1 ミド デラ 5 HH ロニ ビニ ロロ 4067! 8 F ニ ロス う 人 2 の 1* 

司 め 。 “ + 

609 FOUR エ =1TOUSOOILUCATEFNR (さら) 42。FNR(17)+ ミ sgFRINT" 千 "ssNEXT 

7O_ CULUR う EFDUR エ =1TUSEOELDEARTE FNR (3 フ )+1。FNR(19)+SIFPRINT "入り ggNEXT 

0 COULUR プ 7 OFRTINTUSING" 較 SCURE 村 提 折 欄 "saGCsEFRINTUSTING" HI SGCURE 柱 社 柏 柏 "saHGiEFRIN 
丁 幕 ら ! "sSTRINGB ま も (ME 一 1 。 "折り 8 リ 9 

0 LUCATEO。S う 5FRINTSFC( づ の 9): FUDEE じ 。 SO フ 75 FDEEF 。 SO6: LUDCATE 3 さ B。 で うき 2 PRINT "WM 馬 生計 げ ミ 

100 PLAY7 フ 。 "CC6E3GB 紀 +C ビ A+ ビス 3RG フ 7F 6G さ ESCD7CS5R " 

1 1D ーーー 回 一 一 (メイ ーッ ) 

1 で O 人 も =ITNEEY も ( ロ ) ロー( 人 も = リ 較 りう) 一 (も ニー リ 語り ) す (人 和 も = リ 還 りり ) ネネ 4 りー( 人 Q 和 あり 本 0.) ※40: TF ヨウ THEN 17QO 
1 3O D=FEEF ( じ +B) : IF(D= ニ 67)+(D=B さ 3)THEN 17 

14 り IF D=⑦O_ THEN IF FEEF:( ビ + ロ +B) モウ THEN FUEEC ビ +BH+B。 9O: BEEF' 1 : BEEFO_ ELSE GOTH17Q 


出 ③ 


ー 玩 5 ら 15D FDEEC。OiC=C+BE FDKEC 、 で O フ 
ーー つつ ゃ つ 王 160 ーーー 筐 を ロコ 〒T 
4 さら に 上 で ああ いつ て こつ 170 H=FEE ド (F+B(G) ) : IF(H=G7) +(H=99) THEN IFG=4THENG=1: GUTUG10 ELSE G=G+1: GUTUS10 
18O IF H=B さ BDSUE 25o 
し と つの 5 パズル だ な あ ぐ 。 190 IF HaA=10 THEN 2 ヨ O 


ZOOD_ FUEE FaOsF=F+E(B)〉) :FU ド EE F。2O6 

ご 19 IF(D=SO6) + す (HH モ ミロ フ ) す (Ha ロ + す 1 =E) THEN 1 

0 計 ( あ > そこ キー 

ご さ 0 

24 の 6 『" 

SO G ビ =GC+10sFLRY "CODEFRB+Ta "5 LOCATE ヨ 。OEFRINT USTING" 柱 欄 揚 欄 " ョ ビュ 

< ら 6 ら D HA=HR+1:LDCRTE Ha-ー1。 で そう CDLODR ラ 5FRITINT "sg CULDR フ 7 

ダグ () ジニ ーー コグ リア 

28OD LUDCATE14。1GsFRINT "EVERY BDDD1]" 

2 ワウ T エ = モイ エー10:FLAY "5aEB ら 6 さ 6 ら 51 RG5A さ BBEGEDC7 ビ 4E1R じ 35 コロ ブフ ロミ B+ ビエ キオ すじ 7BSBERAR7G さ ECFF9R55 
ECD3CC9 ウ "EGOTOU4QO 

る OOD “" 

さき 10 IFMNEEE1THENME=MEー1:FLAYG。 "ロロ +D6+ ビ ミュ +F+ ビ ヒビ + ィ D 提 人 3 ロム 柏 人 そ +D ロ キス + DGGEFD ヨ "5 GHTO4O 
3 で エ F SCEH5 THEN H5=5C 

ささ 0 LODEATE14。12SsFRINT"EBAME DUVER] "jiEFLRY6。 "6FEB+ ビ +E ビ +D7R5REB6Q ス BB+ ビ +D+EBR ウ "5 5BD5U 
B_ 350 GUTHO 

さ 4O ーーー フロール 

る 509 CHNSOULE で 。19。1。S ヨ saLOCATE1。 Os FUR エ =1TUS1:iFRINTENEXT: CHNS ロ LEO。 2 の 呈 。 の 9。 4 RETURN 
3 る 6 の 0 "ニーー 了 テ " モ 

る ア 0_ CHLLHR6。 OsFRINT" 層 "gsFORI=ー1TUS1sFRINTGTRING ま (40。" 略 ") jsNEXT 

る BOD 人 ま (D) =" アア と アデ アブ 

さ 90 人 ま (1)= リ アア アア 自 2 イイ 4 HB 

400 本 (で ) ニ リーー アー 全曲./ ず ー。 還 P。 有 田 

410 0 まま ( う ) ニ の アー 目 子 アア アブ 自 

4 | ” アア アア ィ | 四 

人 430 CUHLURS 6: F ロ RT=OTO4 ELOCATE。 フォ エ IEFRINTR ま (1)sNEXTiCHLUR。 OLOUCATE9。2SEFRINT" 『" 
44 の 0 EDLODR4。63:LUDCRTE17。18IFRTINT 揚 D" ネ を 分"s sgCUDLUR さ EPRTNT 「 呈 靖 1 琶 本 厩 党 迷 迷 3 SFC(1O) 
450 FURT=1TO1OIFLAY プ フリ +CO" ELHEATE1 ヨ コー エ 。16:FRINTGTRING も (TK2+ す 1 。" 朝 け )sNEXT 

460D_ COULDUR4:FDRT=1TD ラ 7EFLAY"ーC ビ "ELDEATE1T』。16sFRTINT 幕 O" MOIsNEXTEPRINT" 固 " 

人 470 FURI エ =19TH ミ 7 ミ ELOUCATE1T。1 ヨ :FRINT 手 0" 條 "ssiEFPLAY"+TB"sNEXTEFRINT" 因 "COLOR1 

4 ヨ 8D LOUCEATE14。2OIFERINT "HIT ANYEEY" 

490 FDRIT=OTD1OOI IF INEEY ま (OOD EE 征 HEN CUHLDRZ7。1:RETURN ELSENEXTs BUDTD43O 
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。C 計 捉 訪 .AS は ww て すご は き ざ で ご 
し 年 1 BMM 8 8 BI MM HI MM 上 」 
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は 本 YY 生き さ ペ 。Ht ど ad 出さ てき 
トー さき は SS 久 で きす 。 伯 上 どり 漆 ご 
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622 穫 テ ッ ビ 〈⑰ み ちゃ ん トマ ト 〉 み が カ な いな か が ガ み ( み が カ な いな 、 欠 ) (埼玉 県 ・ 飛 田 昌 導 フ ン ) 鏡 は 自分 の 顔 な ど を 見 る だ め に 
昌 人 1 使う の だ か ら 、 ビ カビ カ に み が か な こつ ちゃ ネ / 4 カラ ブラ ム 。* 


y 主人 公 の けん ご 7 ぐん 。 
な ん だ か が が わい いね 。 


WW 上 WM MR WW 見 見 8 】 
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ママ ボー ル が こない うち に 、 下 の ほう を 整 1 及 Y 球 雪 岩 二 
am | 0 
6002 ! 最近 、 、MZ の 記事 が 減り か け 
> < へ Dsor こ one P ここ 


ツン 


(と で さき 中 人 は は 吹き 史 盾 きつ と r 融 ざい 
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。 人 9mtAS ひ と は べ へ て と さき 


人 。H99 ど で 需 二 融 YY / 政 
へ 兄 


。 叶 2 作 半 の S 性 十 浴 寺野 尊崇 紅 
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c 2 二 を 
ド し II I I 1 IM 』 !I 1 1! I IM 1 』 1 』 
ジグ BB みみ よ トブ フト ッ グ (アン ジグ ガ 6) の 
あい だ に ボー ル が と び こ むと 、 レ ン ガ 
や ブロ ッ ク が 割れ る こと も ある 。 こ れ 
は 、 ュー クツ が と うら の る は いや だ 10 
と ボー ル が 主 娠 し て いる の が だ 。 
ボー ナス の さこ らん 。 は 出 4 みる さえ さく ME ッ ク を 秒 せ る 
ーー ブ プ ま は 死 の 宣告 340 また 3 分 間 、 元 気 に 動 きま わ 3 き くら ん ば が 消え ちゃ うけ ど 、 そ を こ 
る よう に だ る さ 。 を 通れ ば ちゃ ん と ボー ナス が 入る よ 。 
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50 面 る 公 い つう て いる の に 。 ブロ グラ 
ムリ スト は 100 行 +zZ。 な か な か 、 コ スト 
パフォーマンス の 高い 作品 。 

部 屋 を は ね まわ っ て いる ボー ル の な 

- は 爆 絢 が し か けら れ て いる 。 だ か [ 6 
ら 。 SR に の だ る と 更 史 。 を と で 、 寺 2 


。 寺 


ミ は 生き の びる た め に ブロ ッ ク を 動か ' ・ 
し 、 ボ ー ル の は ね か える [向き を か えて 、 
だ ん と が 人 則 四 (X の な らん で いる と こ 
ろ ) ま て 誘導 し よ ょ う 。 

で も 、4 分 以上 も や っ て だ め な と き 
は や っ ぱり 死ん で し まう (タイ ム オ ー 
ペー 2 ググ 55 沙 だ っ だ ころ 、 ボー ナス 
の サク ラン ボ が 出る の で 、 せ め て こい 
つ を 食っ て か ら 死 の う 。 ( 注 ・MSX、 X1 
パー ジョ ン で は サク ラン ボ を 食べ る と 8 0 ーー “ イート ャ ーー トー 
タイ ム が 長く な る よう に し た) ム こ うし て 追 も キン キン と 作 つ て お いて 、 さ あ ポ ボー ル を 出す ぞ 。 


績 葵 BALL> ゴー ル の 入口 の 3 マス を 、 い つ し よう けん めい に どけ だ けど 、 結局 タ イム オー バー に な つて し まう 。 で 先生 
が や る と 、「 ど ー す れ ば 一 定 の 動き を する な ……」 つ て ふう に 考え て 、 す ぐ で きち ゃ つ だ 。 ち えつ ! ヴ 


I 川 きり CB2 ル \OO ン ジル @ 


。J……- 人 間 の 万 向 510 一 540 ボー ル の 移動 


・ XA.YA…… ポ ボー ル の 座標 550-560 ボール の 表示 
。GH…… ボ ポー ル の 座標 増分 570 一 600 ゲー ム オ ー バ ー 処 理 
・ CC…… サ フラ ン ボ が 表示 され て いる か < 610 面 フ リア 処理 
SG スコ アピ 620-1120 面 デ ー タ 
。MX…… ミ ス の 数 (一 0) 田 チ エッ フ ボ イン ト 


・ 画 プロ プラ ム の 説明 

。 10- 20 初期 設定 1 

。 30 一 150 キャ ラク 設定 

・ 160 一 230 マイ トル 画面 表示 
。240 一 260 初期 設定 2 
・270 一 330 ゲー ム 画 面 設定 
・340 一 390 キー 入力 処理 
。400 一 470 人 間 の 物 動 ・ 表 示 
・480 一 490 サフ ラン ボ ポ 表示 の 判断 
・500 スコ ア 等 表示 


50 も の 面 バ ター ン が あり 、 思 わざ ず 採 用 
と さけ ん で し まい まし だ 。 だ だ 、 人 間 が 
ゴー ル (あみ ) に 入 つ て し まう と ダイ ム 
オー バー で 死ぬ まで 何 も で き な い と いう 
の が 、 ち よ つ と 気 に な り ま す 。 そ こ で 、 
460 行 の 一 〔X, Y〕) J 十 4 : 以下 を GE 
TZ も お : 1FZ も テ ミ *GZ THEN 5 
/0 ELSE 480 に し て みて ぐだ 
ざき じゃ らら で (ゴー ル に 入 つ て いる と き ) 
自殺 で きま す 。 CcT 補う 


10 M=1iCLG3RMXE3OE TNIT TCRTIG ロ " 
2 LSESSTMNTI OURT1 1 PPRTY) 


3 FUDNT ま (2 で )=HEXEHR ま ("FFFFFFFFFFFFFFFFOOQCOOOOOG0000000BOBOBOFFOBOBOBFF" ) 
440 FUNT 和 (だ 。 き =HE XCHR ま ("OO0Q0O0O0QQ0QO0O0Q0OQQ0 フ 7EFFFFFFHFBFDF プ EQOQOCEO2Q2QEOQOQOOOQ" ) 
5O FUNT ま も (で 5) =HEXCHR ま ("1EOOO0O00000000E600161C193FSB6CE600161CO10610000 じ 6" ) 
ら 60 FUNT も (2。 ら ) =HEXCHR ま も ("1COOQOQOQOQOQOQ0OQQn1COO1a1C193F3B ヨ 11COO11CO1010O0001C" ) 
70 FUDNT ま (で 』7) =HEXEHR ま ("BOOOOO0OCGOOO06 さ OO5BSBPBFC1 じ 3663005B3BBO8BOOODOOD6 さ 3" ) 
ヨ O FUNT も (2。 日 ) =HEXCHR ま ("SO000000000003 ヨ BOOSB3 ヨ 9 ヨ FC1C1 ヨ 3 ヨ 005 ヨ 3 ヨ ヨ 080O00003 昌 7 う 
9O FDNT ま (人 G。 ウ )=HEXCEHR ま ("SEOOOOGOOOOGGO66005RSCE18B7EBDE466005RSCOODOO8B10066『" ) 
100 FUNT ま (人 G。10) =HEXCHR も ("COOOO0000000066007E3C1 ヨ 7EBD 全 466007E3COO00d10066" ) 
11O FHNT ま (人 G。11)=HEXCEHR ま ("OOOEOSOSOSOOODOOO さ じ 7EFFFFFFFF7E3 じ SC7EFFFFFFFF7ZE3 じ ") 
12O_ FUNT も (で G。12) =HEXCHR ま ("OOOO0OO0000Q0Q0Q0Q0Q00 ワ 995EBF ア 7F7EFEZF ヨ DOOOC1ASE う 4 コ 5ROCOO" ) 
13O FDNT ま (人 で 。13)=HEXCHR ま ("DD7D409ADBB3595SRDOOOOOO00000000006080BOODRDOBOOOORD" ) 
140 FONT まま (で 。1 人 4) =HEXCHR ま ("OO0O0O00000000000005aDEBO ヨ EDESSOD7S560000000000000000 7 ) 
155D FNT ま (で 。152) =HEXCEHR ま ("OO0OO000000OSSOOOOQ00000QO0OEEEEEEOFO6OR 1 ご で CODD ウ DO ) 


160 FPRINTL ヨ 。 ミ ] ミ 。 さ 。 さ 。 さ OO。 OOa う 4。0。0』043。O。Os0。O0。0。 さ FE。4] さ 3』。0。0。0 ュ 3。O0 ュ 0。 さ 0 さ * 0 
170 FPRINTO。 そ 。D。O0。D0。O。OD。 ミ [日 。5] さ 。OD。 DaOD。 さ 。O。 さ 。D。O。O。 そ 0。 さ 。 OO ょ DO。0。 0。 さ FE 日 。 ら ] さ 』 うさ 。 さ 。 3 
1 ヨ 0 FPRINTO』。 0。 さ ミス 。 さそ 。 さ 0Oa SO。O。OaOaO0。3E ヨ 。 ア ] さ 。 OOaOa。 ネ 0O ュ 3。 OOkO9。 う 404。 さ 。 00。0 ュ Os 
190 FPRINTS[B。B1 ミ 。D0。O0。O。 SaO。 SaO。Oa Da 3。D0。 さ 。O。O0。0。O。O ュ 。 さ [日 。 ワ 9] さ 。 さ 。 さ 。 さく 0O。0。 さ OO0 ュ Os っ 
200 FPRTINTO。 そ 。 さ ュ ささ ュ さ ュ 0』。 さ 。 ささ 。 さ ュ さ [4。 1 人 4] 

10 FFRINTSE4』。17] ス [上 で 1。14]11[F21。17] ウ 

2 ら oO0 CDEOs CURSODR5。 1 フ 7EFRTINT"。。。。。。。STUNE "5 CEURSUDR5E』。145PRINT"、。。。。、.-BRICET EEURSURE デ 
17sPRTINT"。。。。。。。。BOY" ICURGHR22。14:PRTNT" 。。。。。 に BALL"s CURSUR ウ 。 SERPRINT "GAME STa 
T [FEEY] "sMUSTC"T フ + ォ ビオ +D4 オ キオ に で + 仙 4 キロ + じ 6+D4+F 4 十 仙 オキ じ さ +F 4 オオ す D 人 4 キビ 4 オ +D 人 4+ す は 5+D4+ 選 4 オ EE 人 4 士 伯 ら +D4+ 
品 +D9" 3 UTCM 馬 征 

スウ GETZ 和 = 1FZ ま = リリ "THENSGELSECL53 

240 FUHRT= 和 も D400T ロ ま D ア EE FIHEET』 ロ INEXT 

2 X= ニ 12kYm1 GrXA テ ニオ = YO=5= コテ 3 Da1 3 日 1 

260 INIT "ERTEI TV ITT ま ="OQOOG0GO" 

フロ FDRI=1TD2SEFPFREINTET。11EE1。2 そ 1SE1』。T12ES ス 。TJ2ENEXTIEFFRINTES4。 19] で ュ ジュ ジョ ジョ デー[ デ 4。 
の の の 22S。 20 コ 13LOS。 211SLO マ 22 1 

28o CURSDRSB』 SOEFRTNTE 1 OO] 人 攻 < 介 胡 

2 の 9 の 0 CURSUR29。2 ュ PRINTE 上 6。 の 1"GCURE き 琴丘 琶 汰 | ミ 

さ OOD_ FRINTE6。O]1 "ET THEB 琴 王 杯 層 誠 宏 革 痢 1 らら " 

ミ さ 10 CURSOR フ 。10:FRTINT "NBO. B'sMi "9 BTART" 

20_ MATT7OQI CEURSDR7 ェ 105FRINTSFC (1 人 2) 

ュ ミミ O_DN_ M BDTD 62O。 6 ら さ O ュ 640。 65O』。 ら 660。 ら 670。 6BO。 690』700。 プ 10。 7SD ュ 7 コロ ュ 740 ュ 75 ュ 76D』。7Z0 ョ 7 日 
oO。790。 ヨ 00。 日 10。 ヨ 20。 ヨミ 0。 日 40. ヨ 50。 ヨ 60。 ヨ 70。 ヨ 0。 ヨ 90。900 ょ の 10。 920。 9 さり 0 ょ 940 90 ょ 60。 970。 9 
O。990。1000。 1010。10SO。 103O』。 1040。 1050。1060。 1070』10BO』10906。1100。1110 

さ 40 FURT=Yー1TUY+1kFPFRINTEX。1]OENEXTI 

さ 呈 DB= ニ On=OI USR (で アブ ) MM=FEEF ド (95) 

ミネ 60 ITFM=19THENR=1: ゴ =Z』 TFJE FETHENJ=1 

ミ フ の IFM=OTHEN ロ = テー1 コモ アミ TFJ ミ 4THEN ロ = テ さ 

OO IFMM=17THENB=1ELGEIFM=1 ヨ THENH=ー1 

さ ミウ D TFE=1THENJ5ELSE 1TFB ロ =ー1 THENJ=6 

400 =PEE ド ( ま D4OO+(X+ 台 ) (Y+ す 日 ) 介 O ) 

41D D=FEEFE ( ま D4OOD+(X 二 仙人 ) 二 (Y+ オ E+ 日 ) 4 い ) 

420 E=FEE ド (本 D40O+(X 全 日 ) キ Y 剛 和合) 

4 さい F=F'EE ド ( ま D4OO+X 向 二 (Y 仙 二 H) ※ 人 40) 

440 ド = ニ PEE ド (も D4OO+(X 合 す 唱 ) キ (Y 人 日 ) 人 0 ) 

45D TITF(CEE1) ま (XS P2B) THENX=X+ 人 naE Y=Y+TBs IF ビ =2THENIF(DSE1)*(DE SS)* ま (DSE1O) THENFFRTINTLEX 
sY]OEX+a。Y+TB] る ELGEY=YーBHs X= ニ Xー 人 ni GHTO4 ヨ O 

460 ITF( じ =1) 二 ((X=2B)*(RE FE1) )THENFPRINTEX』YJOEX』Y]J+4: BODTH4BO 

470 FFPRINTE Xー』Yー 昌 1OE X。Y] ゴ + 和 4 

480 IF(TIT ま = リ "OO0O25OD")* (CE=O) THENFFRINTE 1 で 。 12]15 

490 IF(TIT ま "OOOG ロ OO ) (じじ ビニ 0) (XX=1G)*(Y=12) THENGC=GC+5k MUGTC"T ア + ォ CO+DO Vs じじ =1 

DD CURSDR さ D。 43FRTINTGC 』 「 昌 本 是 財 度 営 党 3「3T1 ま : 


510 IF(E=1)+(E ビ = や ) THENGB テ =ー は ロミ し =1 
52O IF(F=1)+(F=S) THENH=ーH* し =1 


コ さ OZ= ゴ +1 1 TFL=1 THEN コ SO 
554D IFE デ 1 HR ビデ THENH= テ ーH 5 ロニ モー ロ 5 ヒデ 1 


zz 本 テッ 4 人 ダ ゆみ ちゃ ん トマ ト 〉 だ ん だ い ガ い だ ん だ (団体 が い だ ん だ ) ( 玉 上 飛田 計 痛 ク ン ) > 叶 彦 クン 出 子 いい ね 。 ご の 作品 は 
あ 古 3 カラ グラ ム 。3 二 4 十 3= ニ 10 カ ラブ ラム だ ! 一 気 に 10 カ ラブ ラム 突破 。 お めで と う 。 立 


プロ 77 ム 
7 * ブ ェ ッ ト 


ら 50 ド =FEE ド ( ま D4OO+ (XR+G) (Ya+H) *4O) :i IFK=2 DR ド =1THENFPRTINT[ XA+G。 YA+H] 12+ ド に iMATT9 ウ 

560 XQ=XRQ+GI YA=YQ+HIFPR INT[ Xa-G』 YA-ーH]O[ XA。 Ya]1 1 : GUND60』L: FXa=2 ヨ THEN610ELSE IFT1 

ま >"OO0259" THEN5BOELSEIF (XRK テ X)+ す (YA SEY) THENL=O GDTDS5O 

ら 709 FFPRINTE X』Y]12:MX=MX+1: CURGSHRMX 』 12*FRINTE2。O] "Xs MUSIC"T フ ー ビ さ "5 TFMX で ささ THENMAIT 

299』 GBDTUS4OELSEE ま ="BQAME DUVER": BODTD59O 

5 ヨ 0 E ま ="TIME VER": GUTUS59O 

570 FDRI=1OTUD1SEFFRINTEZ7』 エコ O』O ょ 0 ょ OO』O ュ OsO ュ OO OE NEXTI CURSDRB』11:FRTINTE も 』 5 CURSDR 
・24: PRINT "GAME START [FEY] "isMUG1C"T フ アー ビ さ RGー ビ さ R マ ー ビ さ R4ーC6" 5 MUSICMAIT 

6OO BETZ ま 』TFZ ま =" "THEN6OOELSERUN 

610 SC=5 ビ +10s =M+1: MUSTC"R3T7B1R5R1RBB1R5Q1"gFDR エ =1TD2OE MUSB1C"T フ +EO+DO+EO" ENEXTs 

MUSICMAIT: IFM= 局 1 THENM=1 : BHTUS4OELSE240 

6<O_FDRT=5TD19:iFPRTNT[ 1 。 王 ] さ [ エ 』19]3[ 昌 。 エミ [ 19。 1 コミ 5 NEXTT IiGBDTD ミ 40 

630 FUHRI=STU22 FFPFRTNT[ 1 。 日 ] さ [1 エ 。 16] さ [日 』 エミ [16』 1 エコ うき 5NEXT: GUTO さ 40 

64D FUR1 ユ =3TU9sFFRTINT[ 1』 さ ] さ [1 。 ワ 9] さ [ さ 』 エミ [9。 1 ] さ 5 NEXTIBDTDS40 

ら 630_ FURT=2TU22 FFPRINTE9。 エ ココ [11』1] さ 上 13。 エミ [ 上 155。 1] ミ 5 NEXTI GUTOU ミ 40 

66O_ FPRINT[ 10。』1 つ ] ミ 。 さ 。D。 さ 。 ス 5 BDTD さ 40 

670 FDRT=ETU22EFPRINTE エ 。 ら コミ [ エ 。 1 日 ] さ [ エ 』 1 で] さき [6』 エ コミ [ 18B』 エコ さ [ 12。 エコ さ 5: NEXTI GBDTD ミ 40 

ら 580 FUR1 ユ =3TU9sFFRINT[ T』 さ ] さ [ 1 9] さ 上 さ 』 エ 2 上 9。 エコ 2[15。 エコ ミ [ エ 。14] さ [14』T]:NEXTE BUT ロミ 4 

670 FDRI= さ TD ウ iFPFRINTE6』 1 コミ [17』T エ +10]1 さ [上 エ 。6]S[ エ +11』16]2iNEXTIi GBDTD34O 

Z00_ FORT=5TO19:FPRINTE。 エ + オ さ ]2[ 19』】+ キ る ]2[ 上 エー ミス 。 1012[ エ + ォ ミネ 。10]23NEXTEFPRINTE11』10] さ 。 さ 。 さ 

LEG』11 コミ [5。 1 で 3[19』11]3[ 19』。12]3: GBDTDS40 

7106 FDRT=5TD19IFFRINTET』 5] さ [ 1』 19] さ [5』 エ コミ [ 19。 1 コミ ENEXTIEFDRIT=2TD4gFFRTNTE 弓 。 1 2[ エ +1 

日 。 ロ SF 19。1 ヨ +T]2[T』19]2ENEXTI GHTHS4QO 

72O_ FDR1T=2TU2SSEFFRINTET。412[T。12]2[T。2O]SsNEXTEFFRINTES。41O。O。OE11。12]O。O。OL2O。2 

910。Q。 0 GHT ロ 40 


Z30 FOR1=BTD16sFFRINTET』B] さ ET。 16] ミ [日 。 エコ さき [16』 エコ 5NEXTIFFRTINTE つ 。 1 で ] つ 。 つ 。 つ 。 つ 。 つ 。 つ 。 つ 。 つ 
ws デー[L14。 1 で だ] つつ ュ コ ココ 。2 ュ 2 ュ 2 ィ 2 GUT ロ 340 


74O_FUR1=STUDSSEFFRINTE き 113FS1。11 る ENEXTIFDRT=1OTD14:FPRTINT[ 1 。14] ミ kNEXT GDTD さ 40 
730 FURT=STU19iFFPRINTET。 5]2 ET」 1912[ 呈 1 2[19。 1 ]2:NEXTEFORT=STO22IFFRTNTE 10。 1 ] ミ [14 
sTJ3sNEXTsFPRTINTE11』。 19] ミ 。 さ 。 さ 4。 さ 5 BDTD さ 40 

760_ FDRT=STD9EFFRTINTET。] さ [上 。 エミ [ エ オ 1O』 呈 ] ミ [ 15。 エミ [ エ 』 15] う [9』。 エ +101 さ [ エ + オ 10』1 王 ] さ [ 15。 1+ 
10]13ENEXTEGHTHS40 

770 FURT=STOD ウ iFPRINTE エ 5]2[F9。T エ SF エキ 10。 昌 2[15。【 SET。15]G[ 上 の 9』 エ ナオ 1012F エ + オ 10。 1 昌 ]2[ 1 旨 。 エ + 
10JEsiNEXTI GUHTO ミ 4 

78BO_ FUR1T=ETU2SEFFRINTE ウ ょ エコ さ [11』 エミ [1 さ 。 エコ ゴミ [ 1 昌 。 1 コミ F 1 913[ T。』 11] さ [ エ 。1 さ ] さ [T。 15 ら ]IE NEXTs 
SOUTHS34 

790 FURT=STD19sFPRINTE 紀 。 TS[9』。 1 コミ [1G。 エミ [15。 エコ 3[ 19。 1 ]2aNEXTI BDTD さ 4 

00_ FURT=STOU19&FFRINTET』12]SE1G』 1 12[1。 ヨ 1 ミ [T。16J3sNEXTE GUHTOS40 

810 FDRI=STOU ウ IFFRINTET』 JSBF ウ 』 TS 上 エ + オ 10。 呈 SG[15。 1 SET。15J2[9』。T+1012[ 上 エ +10。1 呈 ]S[ 1 王 。 エ + 
10JEINEXTEIFURT=SETUSSIFFRTNTET。 12] き NEXTI GUHTO4O 

BOD_ FOUR エ T=3TUS1IFPRTINTE1』。 ミ ココ [上 さき ュ エ コミ [FT ょ 211 さ [21。1] さ ENEXTT BUDTD さ 40 

30 FURL=OTOU14GTEFSE FOUR1=3TH75FFRTNTE エ +L』。 さ + し コミ [ エ + オ し 。 フォ ] さ [スミ +L 』。 エキ し] コミ [ フォレ 。 エ +L ] さ = NE X 
TINEXTIGBHTOUS4O0 

B40_ FURT=ETUSSEFFRINTET』 ょ 6] さ [ エ 』 1B] さ [FT。 1O]SET。14]12ENEXTIFDRT=11TD1 さ :FFRINT[E 1O0。 TS。 
OsOsOsEET。1013[ 上 1T。 1413INEXTI GOHTO さ 4O 

BSO FURT=STUSSEFPRTNTE5』 エミ [上 7 ょ エコ [1 フ 7。 エミ [ 19。 1 コミ 5NEXTT 5 GBDTD さ 4 

560 FURT=STUESSFPFRINTET』 エミ [ココ ー エ + オ 2。 エミ NEXT1 GUTO ミ 40 

B70 FURTESETUSSIFPRTNTE5』 エミ [7 フュ エコ さ [17 ょ エミ [19。 エミ [FT。 ら ] さ [T。1B] さ ENEXTTEBDTD ス 4O 

0 FURL=6TUEOGTEFSEFHRT=2TOU2SEFFRINTET。 し ] ミ 5NEXTEFFRINTE11』L]O。O。OINEXTE GODTO そ 40 
820 FURL=6TUEOBTEF さ FDRT=STDSSIFFRTNTFT。L]2ENEXTEFFRINTE 11。 し ココ 。 ミ 。 さ INEXTI BDTD340 
00) FURI=STO9sFFRINTET。]2[ 1 昌 。 エコ 2[T。 ワ 912[ 19。 1 ]2[ 1】。1 コ 12[ 呈 。 エ +1012E エキ 10。1 コ 2[ 1 曲 。+10 
] デ [エー ミュ 1 で さき [ エ オ 1 ス 。 1 で ご] さ g NEXT BDTH さ 40 

710 FURT=2TO2SSSFFRTINTE11。1] ミ 。0。 コ [FT 。 ら ] さ [1。 12] さ [1。 1 日 ] さ 5 NEXTs BUT ロミ 40 

7<O_ FURT=6TD19STEF さ IFPRTNTET。 11] さ [1。12] さ [LT。13] さ [T。 プ ] ミ FT エ 。17] さ NEXTsBDTD ミ 40 

730_ FUR1=6TU19BTEF さ FRL=STU19sFPRTINT[T。L]2sNEXTL 。 TE GOUT ロ ス 4O 

740 FURT=STD9sFFRTINTET。 エミ FT エ +10 ょ エコ ミ [ T』 エ + オ 1 1 ] さ [FT エ + オ 10。 エ +11 ] ミ 5NEXTs BDTD ミ 40 

750_ FOURT=STO19IFFRINTET。1012[T。14]2[10』1]2[14。1]2sNEXTEFFRTINT[ 14。 1 で ] ミ EGOUTO ミ 40 
760 FURT=5TO19STEP さ 5 FPRINTET』 11 12FT』。1212FT。13]2[T。10] ス 。 さ 。 さ 。 さ 。。 さ INEXTE BDTD さ 40 
7 FURI=STOU19iFFRINTET。 昌 ]2ET。1912iNEXTEFURT=2TO10IFPRTNTE 昌 。 エコ で [ 19。 1 ]2[ 呈 エキ 12]2[ 
1 ウェ エ + オ 1]JEENEXTE BDTH ミ 40 

7BO_ FUR1=1OTD14sFFRINTE 1 。 昌 12[ 日 。 1 JE[T。16J2[16』1]2gNEXT BDTDS40 

770 FURT= ニ STUSSEFFPRTNTE12。1] ミ [1。 12]35NEXTEFFRTINTE11』 121O。0。Os BOT ロミ 40 

1000_ FOURT=3TH19STEFSEFDRL=STUSSEFFRINTEE』 1】] さ : NEXTL 。 TBDT ロ 4O 

1010 FURT=STUSSEFPRINTE12。T 1S2FT。12]2ENEXTEFPRINTE 11』。12]0。0。 Os BUT ロ 4 

1OEO FURT=STUD1OIFFRINTE1O』 エコ 2ET』1O12EF 14。T 2[ 1 オウ 』1O]2[ 1D。 エ + オ ラコ 2[ 1 。14]S[ 14。 エ + キ マウ] つ F エ + 
ワ ュ 14JEsNEXTEGHTH ミ 4O 

1 63 FURI=STU19iFFRINTET。 呈 ]2[T。19J2[T。12]2[T。B]2[T。16]J2ENEXT:FURI=6TDZ フ FFPRINT[5。 
IT」 さ [上 19 ょ エエ +11 13 さ INEXTE GHTO ミ 4 

1040 FURI=ETDESIFFRINTE 11。1] コ さ [ 1 さ 。 1 コミ ENEXTsFURT=5TD19sFFRTINT[ 1 。 王 2[ 19。 1T ]2[ 1。19]2s 
NEXTsFHRI=15THSSTEP-1 』FFRINTET』。912[ エ 。1 昌 ]2[ 15。 12: NEXTI GHT ロ 40 

1050 FURI=ETD1OIFPRTINTE 1。1912 上 FT エキ 1G。19]J2[F 10。 エ +10]2[ 14。 1+1O0]2E NEXTi GBDTD ミ 4O 

10560_ FURL=3TUS1GTEF さ Ss FHRT=6TO1 ヨ FFPRINTEL。】 コミ [1。 し 2sNEXTT LE GUTU ミ 40 

1070D FDRT=SETDSSEFPRINTE エ うさ ] さ [ 1 』 フ コミ [7。』 エコ ミ [ さ 。 1 コミ = NEX 丁 Ti BDTD さ 4O 

1080 FURT=STOU19sFPRINT[ エ + さ 。 2 コラ [上 エ + さ 。 コミ [ 1 1 。 1 ]2[ 1 さ 。 】 ]2[ 12。1+ オ 2]Os NEXTs GUT さ 4 
1070_ FURT= デ TUD1OIFFRINTET。6]2[ エ 。1B]2[ エ + オ 1G』 ら 1]2[ エ +12。1 昌 12[ T+6。12125 NEXTI GBDTD ミ 4O 
1100 FOURI=ETOUSSSFFPRINTE 12。T 2INEXTI GHTU さ 4 

1310O FURI=STU1OIFFRINT[ 了 。5]2[ 10』 1 2[ エ + オ 10]2[ 1+9。5]2[ 19。』 1T ]2[ 19。 1+5]2[ 1+B。14]S[ エ + 
1。1412[12。 エ + オ ワ ]2[。 エ +9]2[ 19。1+9]2 ま 8 NEXT 

1120 DTDS40 


テッ 
吉 人 * 


交 り 09G/ ジル 


〈⑩ み ちゃ ん トマ ト 〉 な ん だ か い だ ん も ん だ い ガ だ ん な (な ん だ 、 階 段 問題 ひか 、 日 那 ) (東京 都 ・ 田 吾 作 ) 交 こ の あと 、3 階 6 
へ 行か ん さ 、4 階 に 行か ん よ と 逆さ 言葉 が 続く か ら 、 な か な か の も の で すね 。3 カ ラグ ラム 。* 


いろ ん な お 楽し こさ がい 
ァ と ンダ っ つ ぱ いあ る ゲー ム / 


27 | リリ 0707 7 7 /  / |/ 


! 股 ら ん まる 


! COSMO PLA 


0 


ペー ニー 
ーー 
ーーー 


6 
利 〒 有 望 FW 
直 無 者 て 
ま 神 を は < 
で 人 奈 記 CN 
人 し フ 
! ZMA の 高橋 つか 介 生 2 ァ 
5 ミク の ラ 日 名 コ 
! さ は ボク の ライ 5 但 紀 そ コ 1 
B > 3 
バハ ルレ 6 会 3 秋 う 
「 1 町 同 ・ プ 上 
度 12 
の | 包 話 を 
発 17※ 番 作 和 
行田 2? 号 り 
? 中 人 m ま し 
1 フレ し 
0 7 ム ョ 
べ 信 四 
| 会 
1 の 和希 
画 変 数 リス ト 6 
HS…… ハ イス コア 用 YE 
NAS$S…… 名 前 入力 用 > 
X…… ア キレ ス の X 座 標 2 
FR-…… 敵 の フラ ブ UM 
aa こよ メメ 5 し F 
FU-…… エ ネル ギー 9 
Y…… ア キレ ス の Y 忠 標 ・ 
FE…… エ ネル ギーSUB ・ 
入 敵 の ビー ム へ の X 秦 標 
TY…… 凍 の ピー ム の Y 座標 ・ 


TT……: だ お し だ 敵 の 数 6 
バリ ア の 切れ て いる 時 間 * 
…… バリ ア 用 フラ グ ブ 。210 一 250 バリ ア の 判定 


CN アキ レス の X 座 標 の 移動 量 
YY…… 敵 の Y 座 標 の 移動 重 

田 プ ログ ラム の 説明 

10- 20 ハイ スコ アテ ー ブ ル の 設定 


ュ ン トロ ー ラ ! で アキ レス を 4 方 向 
に 動か し 、A ボ タン で 前 に ビー ム が 、 
B ボ タン で 下 に ビー ム が 出る 。 っ て こ 
と は つま り 、 前 と 下 の 敵 と 戦う っ て わ 
け だ ね 。 わ ーー、 ゼ ビ ウ ス み だ い 。 

で も 、 ぜ ゼビウス と は ぜん ぜん ちゃ い 
に まみ UE 

アキ レス の まえ に は 、 次 か ら 次 へ 1 
びき ずつ 敵 が 現 
れる 。A ボ タン 
で て セツ バジ や の 
9 まう の ka な 9 
どき さ 、 気 か な 
いう ち に 誘導 ミ 
サイ ル が アキ レ 
の すぐ で まえ ん ま - 
で せま っ て いる 
こと が ある の で 


HH エー ち じ ORE 


p 地上 の 敵 と 空中 
の 敵 を いつ べ ん に 
相手 に し て 戦う つ 。 


ゴミ メキ の 


注意 ! こい つ に は や られ や すい の が だ 。 
で 、B ボ タン は 対 カ ニ 専 用 だ 。 

アキ レス が 全部 や られ だ り 、FUEL 
が 0 に な る と ゲー ム オ ー バ パー。EUBL 
は 動い て いる カメ に さわ れ ば ふえ る け 
ど 、 あ い だ の 赤い 高圧 線 が ジャ マ 。 空 
中 の 敵 を 5 機 や っ つけ る た びに 、 こ こ 
が 安全 な 青 に 変わ る の で その スキ に カ 
メ に さわ っ て FUEL を 補給 し つつ 戦う 
の が コツ 。 カ メス に さわ も る だ びに 、. FUE 
し は 100 増 える ぞ 。 


BY の に HPhNI 
ss 


4FUEL は 、 な く な ら な いう ち に チャ ヤン ス さ え あ れ ば 補 結 し て お ご こつ 。 


60-- 70 画面 作成 
80 一 100 初期 設定 


180 一 200 キー 入力 
260 一 300 カニ の 秘 動 
370 一 490 敵 の 秘 動 


500-510 カメ の 移動 
520-550 衝突 判断 


0 50 ペタ ー ト る ポコ ユー ジッ シ 


110-170 エネ ルギー、 バ リア の 表示 


310ー360 アキ レス の ビーム 


・ 560 一 630 敵 を や つつ け だ か 

・ 640 一 700 バリ ア 解 除 

。 710-770 ゲー ハム オー バー 処理 

・ 780 一 850 空中 物体 の アー タ 

。 860 一 870 動作 パタ ー ン 

* 画 40--70 行 の 黒 四 角 は カナ キー を 押し て 、 
* [GRPH] キー を 押し な が ら ル | を 押し て 出 て 
。 こる キャ ラフ マタ で す 。 ま だ 750 行 の 黒 四 
・ 表 は 同様 に し て | を 押し だ も の 。 ま だ 、 
。 70 行 3 段 目 の * 一 "は 同様 に し て | を 押し 
。 だ ケイ 線 で す 。 


ジッ ー 


2 更 


〈《 み ちゃ ん トマ ト 〉 いて な ガ い に い ガ な てい (いな 、 買 い に 行 が な て い ?) お まけ 1234321 23 万 4 千 321 円 ) 
(東京 都 ・ 田 吾 作 ) 玄 最初 の 作品 は な か な か お も し ろ い 。 こ れ は 4 カラ ブラ ム 。 お まけ の 作品 は 、 な ん な ん だ いや 叶 


19 FOR I=&H498 TO &H49F:NA$= 

NA$+CHR$(PEEK( 1 ) ) : NEXT 

29 HS=PEEK(&H48D) x256+PEEK(& 

H48E) 

39 '1 

49 GOSUB779:SPRITEON:LOCATE5 

,4:PRINT" 較 ACHILLES WORLD 画 " 

: LOCATE5 , 29 :PRINTCHR$(189) :" 
RANMARU 8& F.C.C":DEFMOVE(9 

) =SPRITE(3,3,1,139, ,3):POSIT 

ION9 , 119,199:MOVE9 :PAUSE356 

59 PLAY"T3V1503R3:T3V1503R3: 

T3V1503R3" : PLAY "CCCCGECDRRDD 

RDGD:E4G6G6 : 04C2":PLAY"DDDDE 

CEDRDDDD:F4G3F4CC:04C2":CAN8 

:CLS 

69 "2 

79 FORI=26TO9STEP- 1 :LOCATETI , 

29:PRINT" 較 ":LOCATEI ,21:PRINT 

" 較 ":LOCATEI,18:PRINT"ー" :COLO 

RI ,18,2:NEXT:LOCATE9 ,22:PRIN 

T"SCORE 9 

2":LOCATE9,9:PRINT "HI-SCORE" 

iHSi"9"!" BY ":NA$:FORI=9T 

0199:LOCATERND( 27) ,RND(17)+1 

: PRINTCHR$(295) : NEXT 

89 '3 

99 X=29:Y=129:FR= 1:FU=1999:F 

E=9:TX=9:MX=25:MY=39 : RESTORE 

879:LF=9:TM=9:TT=9:AK=2:TK=0 

: JX=2:W=2:SC=9 

199 DEFMOVE(9) =SPRITE(3,3,1, 

1 , ,3) :POSITION3, 209 , 1 : DEFMOV 

E(3)=SPRITE(14,7,1,119,,3):P 

0SITION3, 299 , 155 : DEFMOVE( 4 ) = 

SPRITE(12,1,1,1) :DEFMOVE(6 ) = 

SPRITE(12,7。1.,1) :DEFMOVE( 7 ) = 

SPRITE(13,7,1,119) :POSITION7 

,299,189 

119 '4 

129 FORI=26T09STEP- 1 

139 IFFU=9THEN539 

149 IFFU>1999THENFU= 19099 

159 IFFU=299ANDFE く =19THENPILLA 

Y"R9GRGRG" 

169 FE=FE+5:IFFE=199THENFU=F 

U-59:LOCATE15,22:PRINTFU:" " 

: FE= 

179 LOCATEI,19:PRINT"T ":POS 

ITION9 ,X,Y:MOVE9 

189 "5 


FUEL 1999 了 キ レス . 


| 


199 S=STICK(9):ST=STRIG(0): 多 
人 人 =( (5=2)-(5S=1 ) ):YY=((S=8)-(5S 
=4 ) )・ 欠 = 欠 †XXXG・Y= ニ Y+TYYX8:IFX く 1 
60RX>299THENX=X-XX※8 

209 1PY く 29THENY=Y-YYx8 

219 “6 

229 IFLF=1ANDY>199Y=Y-YYx68 
239 IFLF く >1ANDY>155THENS30 
249 IFLF=1ANDKEF=9THENGOSIUIB65 
W 

259 IFLF=1ANDKEF く >9THENGOSUB6 
69:GOTO66809 

269 "7 

279 MOVE3:RN=RND(3): IFRN=9TH 
ENCUT 3 

289 IFMOVE(4) く >-1THENDEFMOVE 
(4)=SPRITE(12,1,]1 85-RND( 85 ) 
>9.9):POSITION4 ,XPOS(3) ,YPOS 
(3)MOVE4 

299 IFCARSH(3)=9THENS39 

S99 IFXPOS(9) く XPOS( 4 ) ANDXPOS 
(9)+12>XPOS(4)ANDYPOS(9) く YPO 
S(4)ANDYPOS(9)+12>YPOS( 4 )THE 
N53M 

319 "8 

329 IFST=8ANDMOVE(1) く >-1THEN 
DEFMOVE(1)=SPRITE(12.3.1,140 
9。9):POSITION1 XX+16、Y+4:MOV 
訓 

339 IFST=4ANDMOVE( 2 ) く >-1THEN 
DEFMOVE(2)=SPRITE(12.5,1,146 
59。9):POSITION2 XX+4,Y+16:MOV 
E2 

349 IFXPOS( 1 ) >299THENCAN1 
35 IFYPOS( 2 ) >189THENCAN2 
369 IFXPOS( 2 ) - 12 く XPOS( 3 ) ANDX 
POS( 2 ) >XPOS( 3)ANDYPOS( 2 ) く YPO 
S(3)ANDYPOS(2)+12>YPOS( 3 )THE 
NGOSUB 579 

379 “9 

369 IFFR く >1THEN409 

399 SR=RND(7)+1:ON SR RESTOR 
E799.899.619.829.839 ,849,859 
・READA:DEFMOVE(5)=SPRITE(A,7 
1。1):IFFR=9THENW= JX 

490 FR=9:MX=MX+TW:IFMX>229TH 
NW=-JX ' 
419 IFMX く 25THENW= JX 

429 IFMY く 39THENRESTORE870: RE 
ADMY 

439 READMY: IFMY=-1THENRESTOR 
E879:READMY 


ペア っ あま り に も くだ ら な い 作 品 を 送 つ て きだ と いう 勇気 を め て 2 カラ ブラ ム 。3 十 42 ニー9 カ ラグ ラム 。 10 カ ラブ ラム まで 


あと 一 歩 。 ガザ ん ば つて ネ ! 婦 


表 個 * 


67 


ズー/ ミ ニン 人 ‥ 


空 々 ー と コ 


449 POSITIONS,MXJMYEMOVES TE 
CARSH(5)=9THENS39 

459 1FTX く 4THENTX=XPOS(S5)+8: 十 
Y=YPOS(S5) :GY=9 

469 GY=SGN(Y+8-TY):TY=TY+GY※ 
2:TX=TX-4:TF X>TX AND TX-19> 
9 THENTX=TX-109 

479 POSITION6,TX,TYEMOVE6:TF 
TY く 5THENTY=S 

489 IFXPOS(9) く XPOS( 6 ) ANDXPOS 
(9)+12>XPOS(6)ANDYPOS( 9 ) く YPO 
S(6)ANDYPOS(9)+12>YPOS( 6 )THE 
N 539 

499 IFCARSH(S)=1THEN6209 

599 "10 

519 MOVE7:NEXT :LOCATE9 ,19:PR 
INT”" "GOTO120 

S29 11 

S39 ERA9:DEFMOVE(9)=SPRITE( 1 
9.9,1.29,9,9):POSITTION9 XY: 
MOVE9:PLAY"T1Y1M1V1S503C9GCGC 
GCGCGCGCG":PAUSE49 

S49 CAN1 .2.4.5,6:FR=1:DEFMOV 
E(6)=SPRITE(12.7,1,1):X=29:Y 
=120:FU=1999:FE=9:TX=209:TY= 
199:LOCATEI,19:PRINT" ) iAK=A 
K-1:IFAK く >-1THENLOCATE25 22: 
PRINTAK 

So59 FE=0:GOTO0720 

S569 12 

579 KX=XPOS(3):CAN2ECAN3EDEF 
MOVE(3)=SPRITE(19,9,1.29):PO 
SITION3,KX,155:MOVE3EPLAY"T1 
04C9DEFG#GACDEF " : SC=SC+ 1 : DEF 
MOVE(3)=SPRITE(14.7,1,119,,3 
) :POSITION3,209,155 

589 DEFMOVE(3)=SPRITE(14,7。1 
>119,。3):POSITION3,200、155 
599 LOCATE15.22:PRINTEU:LOCA 
TE 5,22:PRINTSCX19:]T= ミ T エ +1 581 
F(TT)MOD5=9THENLF=1 

690 RETURN 

619 13 

629 XC=XPOS(5) :YC=YPOS (5) :CA 
N1 :DEFMOVE(5)=SPRITE(19,0,1, 
29):POSITION5 ,XC,YCEMOVES:PL 
AY"T104C9DEFGAB" :SC=SC+ 1 XSR: 
LOCATE5 , 22:PRINTSCX19:FR=1:M 
X=RND(169)+25:TT=TT+1:TF(TT) 
MOD5=9THENLF= 1 

639 GOTO389 

649 14 

659 FORJ=26TOSTEP-2:COLORJ , 
18.9:NEXT:KF=1:RETURN 


569 CUT3:TIFCARSH( 7 )=9THENPLA 
Y7TIOSB9C'2LOCATEUB 2211FEUX 
1999THENFU=EFU+59:LOCATE15,22 
・PRTINTEU 
6709 RETURN 
5689 TM=TM+1EIFTM=40THENLEF=0: 
FORJ=26109STEP-2:COLORJ,18,2 
・NEXT:KEF=9: IFY>154THENYY=Y- 1 
54:Y=Y-YY 
699 IFTM=49THENTK=TK+ 1 : TM=9: 
り X=((TK)MOD19+1)x2:TF(TK)MOD 
5=9THENPLAY"::R9GEC":AK=AK+ 1 
・LOCATE25,22:PRINTAK 
7009 GOTO279 
719 15 
720 IFAK く >-1THENDEFMOVE( 0 ) =5 
PRITE(3.3。1.1.9.3):1=9:LOCAT 
E15,.22:PRINTEUEGOTO129 
739 PLAY"O1T4M1V9Y0R2"EPLAY" 
D6D5D3D6F5E3E5D3DS5#C3D6":FOR 
1=9TO7:CANIENEXT EGOSUB779:LO 
CATE8.5:PRINT"TGAME OVER 11 7: 
LOCATE8.7:PRINT "SCORE = "SC※ 
19:1F SC く <=HS THEN 759 
749 HS=SC:LOCATE3,.9:PRINT "YO 
U SET NEW RECORD _ 117 ELOCATE3 
>11:PRINT"INPUT YOUR_ NAME (8 
モ シ ~) "iLOCATE3,13:INPUTNA*$:NA 
$=MID$(NA$,1.8) 
745 POKE &H48D,HS/256 ,HS MOD 
256:FOR =1 TO 8:POKE &H497 
+[ ,ASC(MID も (NA ゃ も ,T ,1) ) :NEXT 
759 LOCATE2.18:PRINT "REPLAY 
(START) BUTTON ! "ELOCATE2,16 
・PR 1 NT "問題 昌 昌 還 間 間 間 昌 間 間 間 間 昌 昌 間 間 間 間 間 昌明 
還 較 ":IFSTIRIG(9) く >1THEN7S0 
769 RUN “ 
779 CGSET1.9:CLS:LOCATE9,9:P 
RINT :LOCATE9,22:PRINT お ・EO 
RI=1TO21:LOCATE9。1:PRINT ⑧・L 
OCATE26,I:PRINT る ⑤・NEXT:RETUR 
N 
7689 "16 注意 7 


799 DATA2  ④ こ ④ に は BG の キャ ラフ マタ が 入っ つて いま す 

ガ が 、 こ の リス ト で は プリ ンタ の 性 質 上 完全 に 
899 DATAo 脱 け て し まつ て いま す 。 あ ら か じ め 、KEY 
819 DATA7 4 CHRs (193 ) リ ター ン で F 1 キー 
829 DATAB に この キャ ラク フタ を 設定 し て お いて ください, 

以後 、F 1 キー で この キャ ラク フタ が ガ 打 ちこ め 
939 DATA9 る よう に な り ま す 。④ と ② の 部 分 に は 、 そ れ 
849 DATA1 1 と 27 個 ずっ 、 この ④ に は それ ぞ れ 1 個 す つ 
859 DATA 1 5 この キャ ラク フタ を 入れ て こく ださい 。 


869 17 

879 DATA39 ,31 ,33,36,49,45,51 
59.66.75.85.96.110.130。14/, 
147,139,119.96.85,75,.66.58,5 
1..45.40、36 33.31 .30 1 


gg 民 ジッ ビ ( め み ちゃ 履 ト マト 〉 だ る ま は まる だ (埼玉 県 ・ 中 曽根 塵 将 フ グン ) 誤 あ な り ま え だ つ つう の 。 そ ん お こと より 、 こ の 名 前 、 本 
曲 あ る でしょ!? 良い 名 前 だ ね 。 お と 一 さん と お か 一 さん に 感 放 する の で す ぞ / 2 カラ グラ ム 。 


肛 Y 坊 | 隊 選 


わーい 、 ネ タ の 使い まわ し だ ( 注 ・ 邊 作 
の 『ADD MID』」 が も と に な っ て いる の 
だ )。 ( ニ こ で ファ ミ ベ ペー へ の うら み 
つら み を ひと くさ り 。 中 略 ) …… いひ 
ん 、 で ぶ 大 先生 の プロ グラ ム に つい て の 


語 に は 考え させ られ る クン ン ン 。 
フル ー テ ィ V は 楽し い デン ンー 
し 。 も うわ や で ん な 。 の 


電 
* 


差 ち 込み タ ア イム % 分 


これ は BGー プ グラフィック じゃ な ぐ て 
PRINT だ け で 出し だ タイ トル 画面 。 


II NN IN NN 上 上 上 上 N 区 月 上 上 上 上 上 
| 旨 昌 昌 朋 用 明月 有朋 上 有朋 間 卓上 旧 上 旧 邊 


室 


NN WM MI W 上  W 2 


る か が わか る の が だ 。 
RUN し て 名 前 を 入力 し た ら ス ター ト 。 
さて 、 ゲ ー ム は 主 に 迷路 だ 。 


下 に 出 て いる と き は ノー マル モー ド 。 
L を 入力 し て リタ ー ン キー を 押す と 、 
年 を 回 。 NR だ ら 肥 。 そし て 、 を や 大 
力 する と 前 へ 進む の だ 。 座標 が (0, 
0。 0) の と き 、B を 入力 する と 買物 
が で きる 。C は キャ ング '。 日 数 は か か 
2 立体 迷路 の な か を さ 最後 の カッ コ の な か は キミ の 位置 。 る け と 体力 が 回 復 す る 。 
ま よ う 冒 唆 物語 / の 階数 、 さ 許 標 、 『 涯 味 の 順 。 2 スタ ー と 出 会 26 ファ イ 陸士 
これ て で て 、 キ ミ が 今 何 畜 の どの へ ん に い ド w この も き は 、 民 て ジ ァ イト 、E で 
これ は いわ ゆる ロー ルプ "レイ ング ご 


92 て すら が か し 、 て 大 先生 に よれ 
ば ロー ルプ レイ ング ぼっ こ 」 の は ほう 
が 正しい 表現 な ん だ そう で す 。 あ の 、 
日 な た ぼっ こみ た いな ノン ビリ し た ム 
ー ド が ある か ら で し ょ うか 。。 

タイ トル 画面 が 出 て 、 [S| を 押せ ば ゲ 
ー ム スタ ー ト 。 左上 の 四角 い 枠 の な か 
が 前 方 に 見 える 壁 の 状態 。 右 に な らん 
て いる アル クア ァ アベ ペッ ト が キミ さ の いろ ん 
な 能力 や を その他 の デー タ 。 上 か ら 、 
H.P … 体 力 ( 現 体 力 : 体 力 最高 値 の 順 ) 
EXP… 経 験 値 
A.C… 防 御 力 ( 英 の 攻撃 を か わす 力 ) 
S.L… 攻 撃 力 ( 項 を 攻撃 する 力 ) 
KW セッ バル GLD… 金 


ー= テ エア LTPN[ = 


次 * 


上 
F う 
に う 
| 9 
し 
[ウラ 
/ 


で YO ス くく 6ox の 6 の AA タツ < の > ツル 6oet る ダシ ん の ふえ 66 ダ 2 めく yy かー 
ーー の ー リス 


COMMRNID ウ て し ドッ F 。: 己 . ビ う 調 
DAY・ の 日 数 4 左上 が 目 の 前 の 光景 (行き ご まり の )、 右 上 ザキ ミ の デー タ 。 下 ガ メ ツ セー ジ 部 だ 。 


江 テッ (ウニ ウー 会 語 シ リー ズ ) 「 オ レ み そ 汁 大 キラ イ な ん だ 」「 じ ゃ あ プ ダ + は マ 」 「 そ れ コー ヒー (東京 都 ・YAS) ※ プ 
昌 厨 : 9 汁 と ブラ ジル コー ヒー ね 。 わ か る か な 、 わ か ん ね え だ ろ うな あー。3 カ ラブ ラム 。* レ 


COMMAND(L,R,…) 還 と いう 表示 が 


ご ニン, 


MM 川 - つ ディ 


エス ケー プ (逃げる)。 その 結果 、 戦 う 
らし か っ だ 6TNEUT (AS) 上 出る 。 
ここ で は 、A で 武器 を 持っ て 戦い 、S 
て 魔法 で 戦う の だ (だ だ し 、 魔 法 は L 
EVEL が 6 以上 で な いと 使え な い )。 

モン スタ ー を た お す た だ たび に 、EXP と 
GLD が 増え 、EXP が ある 程度 以上 に 


入力 ) する と 、 レ ベル が あがる の だ 。 
うろ うろ し て いる と 、INPUT(U 5) 
と 中 て 《 く る こと た が ある 。 これ が 際 段 
UE へ 、 お て 下り ける の が だ 。 
5 階 ま で 衝 っ て いっ て DRAGON ( 変 
な 色 の カメ ) を 倒せ ば あがり だ よ 。 


買物 は 1 階 で し か で き な い の で 、 と 


きど きよ まだ も どら な 《 ち ゃ いけ な いよ 。 


あがっ た だ とき 、 買 物 (0,0,.0 で B を 


を る 
が 1 
名 
8 
識 
' 
上 
る 
る 
1 
る 
四 
そ 
区 
3 


4 ひえ ー、 ア キレ ス / いや 、 ご これ は お そ 
ろ し い モ ンス ター な の だ 。 さ て 、 キ ミ は 戦 
う . 【 ビ ) Y それ と も 導 げ る ( 己 ) 


4^ 石 を 向い だ 。 前 訪 に 道 が ひら け て いる 。 
と に か が ぐ 前 へ 進ん で みよ う 。F を 入力 すれ 
ば 、 1 歩 前 進 。 な に が 出る か なー。 


4 これ は 前 は 行き どまり で 、 右 へ 行く 道 だ 
けが ある こと を 示し て いる 。 そ こ で 、R を 
入力 する と 、 右 向け 、 右 / 


還 変 数 リス ト ( 主 な も の の み ) <・M……H 。 460 ゲー ム オ ー バ ー ・ 。 リス ト 中 の 「 あ 」 と は 、 カ ナ キ ー を 押 
A…… ブ ロッ フク デ ー タ ・S…… レ ベル ・ 470 3D 風 表示 用 デー マタ ・ し て GRPH キ ー を 押し な が ら 叱 ' の キー を 
B.C.D…… 壁 の デー タ 。 較 プロ プラ ム の 説明 ( 主 な 部 分 の み )  ・ 480 敵 の デー タ 。 押す と 出る 青い 四角 を 表し て いま す 。 ま 
E…… 自 分 の 向い て いる 方 向 ・ 60-220 メイ ン ル ー チ ン 〈 壁 の 判断 、。 490--580 迷路 マッ プ デ ー タ 。 だ 「 し 」 は カナ 状態 の まま GRPH キ ー を 押 
F……EX ロ ・ 貢 物 、 敵 出現 し ル 一 チン な ど ) * 600 出 ロ デー タ ・ し な が ら ワ の キー を 押す と 出る 白い 四 過 
G…… シ ー ル ド ・230 一 400 ファ イト モー ド ・ 1000 一 1024 マタイ トル 表示 。 (カー ソン ル と 同じ も の ) で す 。 だ だ の 四 
H…… ソ ー ド ・410 一 450 画面 表示 用 。 田 ツ イト ル 表 示 に つい て 。 角 は 、 カ タカ ナ の 口 で す 。 


BBG- グ ラフ フィック デー タ Q 

の 1 2 3 4567 フ 789 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 2/ 
e[lsbsllatslbaluarbsibalsh| | | =IWIIIZIAILIIIAINIL =| 1 
1 hlverlelheterMglerlelMeletbg| | | | | | | | | | | | | | | 11 


の 
4 


2 JIIM1|F31 61|M6T Me1 IM1 IM61FS1IM61|JZI| | 」 人 間 li 1 
3 JI MS1|F31|F31|M1 IM61 IM61FS1FS1 MB1 J21| | | 目 由 画 画 画 画面 画 回 画 3 
4 Msg| | | | IAIJICI 1 llllIIII 4 
5 Mg| | | | 1SI.ILI | | 半 5 
6 MetMetFSIIFS1hetlretlHetjpStlFStlNe1a| | | | IGILIDI | 1 | ll 6 
Z NailMetlFa|FS4IM7IIMZLIMIlFSIlFSIIMN2| | | | ILIEIVI | | 2 
8 人 | 陸 lllyllZlF3bgl | | | 1D1AIYH | トト 中 8 
9 NgIIMZIIMZIIM1IM7IIMZLIMZIM71IMZIMN2| | | | 1(| | | | | ll 9 
10 NIAIMIE| | 」 | ll llil 10 
14 N60| 0|J39|JB9|J30|J36|J30|J0|J30|J30|J39J30|J39|J30 SEREORE L 
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3N9| | | | ll lll ll 本 dE NE lk JNN 
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還 昌 ii EMIE SMD lb Itoelihut ll tk ll 
7M| | | | ll llllllIII | | | | | MeW7 
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19 還 昌 下 放 NN NN NNN Mu 


村 直 Ni li 
%| | | 1 11 lllIIIIIIIITIIIIIIIIII1| 時 
の 1 


っ 34567 フ 78 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 2 


1 SPRITEON:DIMA$(3):A$(9)="E 
1"EA$ も (1)="RAMIPAS"EA$ も (3)="SH 

ARANRA":A$(3)="PIPILUMA" EGOS 

UB1999 

49 F=9:G=9:H=9:K=399:L=365:M 

=15:0=15:R=1:E=9:5=9:X=9:Y=0 
・X0=9:X0=9:CLS 

59 INPUT "NAME":A$ 

69 RESTORE499:FORI=9TOY:READ 

D$:NEXT:A=VAL("&H"+MID$(D$,X 

+1 ,1) ) :GOSUB 419 

79 LOCATE1,19:INPUT "COMMAND( 

L,R,F,B,C) " ,B$ 

89 EsE+(B$="R")-(B$="L"): ITFE 

く 90RE>3THENE=(E く 9 )\-3+(E>3 ) % 

g 

99 IF(B$="F")x(C=9)THENX=X+ ( 

E=1)-(E=3):Y=Y+(E=2)-(E=B ) 
119 IFB$="C"THENL= し - (0-M) :M= 

0 

129 Z=Z+1: し = し +(Z=3)x5: IFZ>3T 

HENZ = 1 

139 IF(X=XO)x(Y=YO) VIEW:LOC 

ATE1,.19:INPUT "INPUT(U,.D) "jiB$ 
・R=R+(B$="D")-(B も ="U" ) :GOSUB 
131:RESTORE699:FORI=1TO R:RE 

ADX,Y、XO0,YO:NEXT 

131 IFR<1THENR= 1 : RETURN 

149 IFR=5THENB=1999:AA=13:AC 
=9:C=199:D=199:C$= "DRAGON" :G 
0T0239 

159 IFB$ く >"B"ORX+Y+(R-1 ) >9GO 

TO299 

169 LOCATE1.19:INPUT "SWORD L 

EVEL (1=25GLD)":T:IFI く >9THEN 
K=K-Ix25: 昌 =I 

179 LOCATE1,19:INPUT "SHIELD 
LEVEL (1=39GLD) "1 1:IFI く >9THE 

N K=K- 1x39:G= 1 

189 IF((S+1)x199)<F THEN S=S 
+1:F=F-Sx199:0=0+Sx5:LOCATE1 
>14:PRINT"LEVEL UPII "TEPLAY"R 
5 " 

199 IFS>5THEN LOCATE1 , 14:PRI 

NT"YOU LEARNED TO [":A$(S-6) 
"1 "PLAY"R4" 

299 IFRND(9)=1THENQ=RND( 3 ) : R 
ESTORE489:FORI=1TOQ+(R-1 )x2: 

READB,C,D,AA,AC,C$:NEXT :LOCA 
TE2.12:PRINT"LOOK AT THE MON 

STERI"EPLAY"R1T8M1Y3V1 909#CE 
BC" EGOTO2396 

219 IF(K<9)+(L く 9 )+(M く 9 ) く >9GO 

TO469 

229 GOTO66 

239 IFRND( 5 ) =2THENPRI NT "MONS 

TER SURPRISED YOU! ":M=M-3: PL 

AY"R5":GOTO259 

249 IFRND(5)=2THENPRINT" YOU 

SURPRISED MONSTER! "iPLAY"R5" 
・B=B-3 

259 VIEW:GOSUB459 :LOCATE2 , 1 2 
・PRINTC も $:LOCATE3.13:PRINT" H 
計る 0 な の も の 4 むせ T 
279 LOCATE1,.19:INPUT" INPUT(F 
5E)" ト Z$:TFZ$="E"GOTO399 

289 LOCATE1 ,19INPUT " INPUT(A, 
っ ら ) "5 の も : TIFZ$="S"GOTO352 

299 Z$= "NO" ELOCATE4 ,14:PRINT 
"=ATTACK MODE=":IF((G+(F/7)+ 

H)/3) >DTHEN J=RND( 5+G)+5:Z ゃ = 

STR$(J) :B=B-J 

399 DEFMOVE( 9 ) =SPRITE(9、3,2. 
32.9.9):DEFMOVE( 1 )=SPRITE(AA 
>9。1 ,1.9,.AC) :DEFMOUVE( 2 ) =SPR 1 

TE(AA,9,1、1.9,AC):POSITION9 

9.159:POSITION1 .64,159:POSIT 
ION2.59,73:MX=RND( 299 ) :MY=RN 

D(299):POSITION3 .MX ,MY 


テッ 
表面! 


319 DEFMOVE(3)=SPRITE(7,RND( 
9) ,1,RND(59 )+35,9, 1 ) :POSITIO 
N3,MX ,MY : MOVE9, 1 2,3 

32 MOVE9, 1 ,2,3:FORI=1TO049 : 
B=B+(CARSH( 3 ) =2) xB:NEXT: VIEW 
: GOSUB459:LOCATE2 ,12:PRINT"M 
ONSTER ":Z$j" DAMMAGE" :PLAY" 
T105CBR8":ERA9,1,2,3 

33 DEFMOVE(9)=SPRITE(9,9,1, 
1 .9.9) :DEFMOVE( 1 ) =SPRITE(AA. 
7,2,.32,9,AC) :DEFMOVE( 2 ) =SPRI 
TE(AA,9、1,1.9.AC) :POSITIONB, 
9,159:POSITION1 64,159:POSIT 
ION2 .59 , 73:MX= RND(209 ) : MY= 
RND( 299 ) : POSITION 3.MX,MY 
335 MOVE9 1 ,2.3 

340 J=RND(5 ) :M=M-J 

345 MOVE9,1 ,2,3:FORI=1TO409 : 
M=M+ (CARSH(3) =9 ) x5:NEXT:VIEW 
:GOSUB459:LOCATE2 、12:PRINT"Y 
0U "ii" DAMMAGE" :PLAY"T105C 
BR8":ERA9.1,2,3 

350 IFM<9GOT0469 

351 IFZ$ く >"S"GOTO0366 

352 IFS<6THEN LOCATE2,16:PRi 
NT"YOU CAN"T USE MAGIC!":GOT 
0259 

352 IFS<6THEN LOCATE2 ,16:PRI 

NT"YOU CAN'T USE MAGIC!":GOT 
0258 “ 

353 LOCATE4,14:PRINT"=MAGIC 

MODE=" : LOCATE1 ,19:INPUT"WHAT 
SPELL": Y$ 

354 J=9:FORI=9TO3:IFA$(1)=Y$ 

THEN J=1I+1 : し = し -5x(J+1 )-RND(6 
355 NEXT:B=B-Jx15:Z$="A" 

356 LOCATE2,17:PRINT "MONSTER 
"iJX15:" DAMMGE" :PLAY"T2DCAC 
369 IFR=5 AND B<3CLS:LOCATE5 
,15:PRINT"CONGRATULATIONS! ": 
END 「 

361 IFB>9GOT0259 

379 1I=RND(51) :LOCATE4 ,14:PRI 
NT"YOU GET": Ti"EXP!":PLAY"R3 
":F=F+1 4 

38 !=RND(151)+59:LOCATE4,15 
:PRINT"YOU GET":1i"GLD!":PLA 
Y"R5":K=K+I:GOTO69 

399 IFRND(5 ) =3THENLOCATE2 , 14 
: PRINT"OK!":PLAY"R5":GOTO69 
499 GOTO259 

419 VIEW:RESTORE479:FORI=9TO 
E:READ B,C,D:NEXT:B=A ANDB:C 
=A ANDC:D=A ANDD 

429 IFB>9FORJ=1T09:LOCATE1 ,J 
: PRINTCHR$(195) : NEXT 

439 IFC>9FORI=4TO6 :FORJ=3T07 
:LOCATEI ,J:PRINTCHR$(195 ) : NE 
XT:NEXT 

449 IFD>9FORJ=1T09:LOCATE9 ,J 
: PRINTCHR$(195) :NEXT 

459 LOCATE18.2:PRINTM:LOCATE 
18.3:PRINTF:LOCATE18,4:PRINT 
G:LOCATE18,5:PRINTH:LOCATE18 
,6:PRINTK:LOCATE18,7:PRINTS: 
LOCATE18,8:PRINTL:LOCATE16,9 
: PRINTRiX:Y:LOCATE16,19:PRIN 
TA$: RETURN “ 

469 CLS:LOCATE6,19:PRINT"G A 
ME OVER":END 

479 DATA2,1,.8,4.2,1.8,4,2,1 , 

8,4 

489 DATA29 ,5,3,1,1,HUMAN, 25 , 

5.4,3、3,AKADAMA,32,19,19,4,9 
,PEN, 89 , 29、6,5,2,NUME,125,49 
,49,11.9,AODAMA,159,39,69,2., 
3,DE HAE,299.79,79,14.9,BIG 


〈 ウ ニ ウ ニ 会 話 シ リー ズ 〉 「 ね え ね え 目 いこ つ ?」「2 つ 」「 言 うこ お も つた 。 じ や ゃ あ 視 力 は 々 」「 し り よ こ に じゅ うし ,」 
(東京 都 ・ ゆ みち ゃ ん の 彼氏 ) 玄 よ く あ り そ う ね な 会話 だ ネ ! 


で も お も し ろ い か ら 3 カ ラブ ラム あげ ちゃ う 。 立 


KANI , 399,69,79、13.3,KOGAMERA 

499 DATA 7454545C6C 

599 DATA EA79C3CAAA 

519 DATA A2CA258AAB 

529 DATA AA39AE31 8E 

539 DATA A25493555C 

549 DATA A3C25555CA 

559 DATA 2583555CAA 

569 DATA AEA75559AA 

579 DATA A31555559A 

589 DATA 3AAAAAAAA9 

699 DATA9.9.9.9.5.5,1,.4.9,9, 

9 の 9,4.2.7,.7 

1999 CLS:PRINT" 

G ゴ ッ プ . . ." 

1991 PRINT" あぁ 

1992 PRINT" ぁ 

1993 PRINT" ぁ 

1994 PRINT" ぁ ぁ 

1995 PRINT" ぁ ぁ 

し し 

1996 PRINT" ぁ ぁ 
し 

1997 PRINT" ぁ あぁ ぁ し し 


に の 9 っ 


あぁ し し し し 


し 

1998 PRINT" ぁ あぁ あ し ああ ぁ ぁ あぁ し 
し 

1999 PRINT" ぁ ぁ ぁ し ぁ し 

し し し 

1919 PRKINT” ぁ ぁ あぁ し ぁ し 
比 

1911 PRINT" ぁ あぁ ぁ し ぁ し 
し 


1912 PRINT" ぁ ぁ し し し あぁ し 
し 
1913 PRINT" ぁ し ああ あぁ あ 
1914 PRINT" し 
ぁ 
1915 PRINT" HHHL し し HHHHH 
HHHUHH あ し し し し 5 
1916 PRINT"HHHU ああ あし し あぁ あぁ 
HHHHH あ し し し し 
1917 PRINT" ロロ あし し ぁ ぁ あぁ 
HHUHUH あ し し し し 
1918 PRINT" し 。 あ し し し し あぁ あぁ 
し あぁ 
1919 PRINT" し ああ あし し あぁ ぁ 
し 
1929 PRINT "し し し し し し し し し し し し し し し 
し し し U":PRINT 
1921 PRINT" [S] KEY ヲ オォ シテ 


人 

1922 CGSET1 .9:DEFMOVE( 9 ) =SPR 
ITE(9,3。1,1.9.9):POSITION9 ,2 
99.59:MOVE9 

1923 IFINKEY$="S"ERA9 : RETURN 


| 1924 GOTO1922 


77 


ニン 人, 


溢 ア ー エ テコ ベー/7 


差込み タプ イム 6 分 


4 えー と 、 ま ざ ず こ の 岩 を 下 に 動 サ し て み 
よう つと 。 カ ー ソ ルキ ー の !。 


4 へ コッ と これ で 爆弾 の 出口 は で きだ 。 
次 は 、 ビ エロ の 入口 を 作る ん だ けど ……。 


画 変 数 リス ト ・470 
W.Z… ブ ルー エリ ア (ゴー ル ) の 座標 ・480 一 720 
A…… キ ー 入 力 ・730 
X.Y……: 主 人 公 の 喉 標 ・740 一 850 
・860930 


田 プ ログ ラム の 説明 


。 9401100 初期 画面 (モー ド 選 択 等 ) 
DE.F…… 主 人 公 の キャ ラク タダ 定 義 用 * 1110-1130 面 ク リア 処理 

s 1140 一 1170 ゲ ダーム オ ー バ ー 和 理 
10 一 370 初期 設定 (キヤ ラク 定義 等 * 1180--1470 画面 デー タ 

380-460 キー 入力 処理 ・ 主 人 公 秘 動 ・ 一 ゲ ー ム を 始め る と き の 注 意 


EN ソラ ンー ラジ ツタ ト 
本 格 バ ズル な ん だ せ ぜ 
2 トード まや つい で いて 、 


自作 の 面 を バシ バシ 作れ る 本 格 パ ズル 。 


カー ソル キー で ビエ ロ を 上 左右 に 
動か し 、 爆 弾 を 下 の ブ ルー エリ ア ま で 


1 
が ジャ マ を し て いる 。 〈 考 えて 動 
207 ド US と 0 陸 な い 


の で 、 と りか え し が つか な くく な る お を 
れ が ある 。 む か し の 有名 ゲー ム 『 倉 庫 
番 」 と 同じ よう な も の が だ 。 
RUN る せる と Select Mode に な り 、 
2 を 選ぶ と メイ ンプ ログ ラム を 実行 。 


作者 の 作っ つて くれ わた 、 か か な が か が 手 き た 


ぇ の ある 面 が 6 面 ま で 入っ て いる 。 3 
を 選ぶ と Edit Mode。 自作 面 の 作り 方 
は 、 下 の 解説 を よく 読ん で や っ て みて 
くれ 。 長 いあ い だ 、 目 分 も 友だち ゃ 楽 
し め る 貴重 な パズル だ ね 。 

ペラ コバ ベ コ ヨッ と 動く キヤ ラク ク グ ク な か 
の 2 まく で て 2 あて も いる し 、。 が ん を も いう て 
も 、 あ の ジェ ュー デ ィング ダーム は うか 
り の (し か し 傑作 も 多い) M 5 で 、 初 
の メシ ツリ アル イム ニク パス ルル だ つら て と 


ころ が ニク グ い っ ちゃ 。 


か くい う 私 は 、 作 独 の 作っ た 1 面 を 
0 が ドラ イィ し て や つと クリ チ し 、9 面 
目 を と き 、 3 面目 を 解け ね まま この 原 


BY oOU テク ノボ リス 
に は 数 回 投稿 し た けど 、 み si 


> 、、。 5 

ん な ボツ だ っ た NH O | 
M 5 を 使っ て 作っ た オリ ジ ナ ル で す 。 テ 
クノ ポリ ス に は 数 回 投稿 し まし た が 、 い 邊 
ずれ も 没 だ っ た ナ 。 
で 今回 も な か ば あ - 
きら め て いま し 「 
た 。 PS 。 イラ 邊 
スト を 書い て く - 
れ た 勝沼 、 月 い N 邊 
っ ぱい 批評 し て く ぐ パ * 
as と の AN 
みん な 、THAY 
QY 邊 

hkS。 ヽ ン 7 
ささ ささ さこ さこ ここ ここ ここ ここ ここ 。“ 
3 

bi 

の 

や 

は 

知 

ら 

ね 

ご 

選 

3 

ロ 

で 

に 


4 ゾル ツ と まわ っ て へ コツ 。 ん 、 ん 、 ん 


稿 を 書い て いる の だ っ た 。 ゃ な ん ガ 変 だ ぞ 。 ず えつ 、 沈 没 ー/ 
ゲー ム オ ー ル バー 判定 ・ こ ご の ゲー ム に は 、 自 分 で ゲー ム の 画面 を * Y を 押し て ぐだ さい 。 自動 的 に セー プ を 
石 の 移動 処理 ・ 作 る 機能 が 内 蔵 さ れ て いま す 。 初期 画面 ・ 実行 し ます 。 セ ー ブ の 和 め 要 の な い 場 合 は 
キャ ラフ ター の セッ ト で 2 を 押す と EDIT MODE に な り 、 カ 。N を 押し て < こ ださい 。 ご の 画面 の ら ゲ ー 
バダ ター ン 製 作 ー ソ ル で 主人 公 を 動 ひ し 、… 岩 の 設置 * ハ へ が 始ま り ま す 。 
カー タダ の セー ツ X… 旧 弾 の 設置 、S… 訂 正 の 吾 キー を 押 ・ 作 つ て お いた データ を ロー ド さ せる に 


すこ と に よ の 主人公 の 位置 に 表示 させ る 。 は 、 レ コー ダー に デー の テー プ を 入れ 
こと が で きま す 。EDIT 終 了 は A キ ー で ざす 。* PLAY 状 態 に し て お き 、 初 期 画面 の 1 を 
A を 押す と デー タマ の セー プ ブ の 必要 が ある 。 押し ます 。 自 動 的 に ロー ドガ が ガ はじまり ま 
ガ 聞 いて きま す 。 セ ー ブ を する 場合 は 
レコ ー ダ ー を SAVE の 状態 に し て お き 、 


すず 。 


(ウニ ウニ 会 話 シ リー ズ 〉 
回 ぶつ だ 音 )」「 な ん で ぶつ ん だ よ 」 


「 ね え ね え ね え ね え 、 て ぶ こ くろ の 反対 な ーー ん だ 」 
「 だ つて ろ ぐ こぶ て つて 言 つ を じゃ な い ガ 」 


「 ろ ぐ ぶ て 」 パンパン パン バン パン バン (6G 
「 じ ゃ あす いか の 反対 な ー ん だ 」「 ガ いす 」 只 


1 FFint ) 四 誰 間 間 im ヨー ジョ テモ ビニ ロ F ミー ヒ ]1 Es 呈 EQ ロ 1 選 ー 三 
の ea co ああ 人 過 ず の ま を w 下 必 Y 1 ょ 。 記 END Et ミイ オロ F | 本 こ 和 oy 旨 2 グ ョ 0 1 中 下 T 。 品 ーーー 
FIn ほ it ニ ィ ーーーー 
ささ 名 に 1OF 用 。 多 中 KTfoF 1= ニ 1 で で ャ セロ 1k に ロロ 1 ロロ F 1T。 呈 BKneit ーーーーー 
中 本 すす 呈 F T モ 1 デ tc 1 回 に mm ] mF 4 Mn な スル ーーーーー- 
CE すじ 。 すさ デ 。 投 性 四 ーーーーーー 
己 PF1 ュ mt に ロビ ミ OFKESaS53 3 9 ロロ IT 日 HITHHUMTE !『 oc 
どす ロビ ドビー キモ で BR も ロ 多き BI uFP ロ ドロ 1。 uFPEEECETOm ロ FTu ロ PEETTI ュ デマ ロロ FTCuuP EE 毅 
上 トド エエ T コ ュー アッ は 3 8 己 王 七 

回 に 1 放っ さ 受 に 
に | 革 和 す オデ すす すす すす すす すす すす すす すす 放す すす すす すす すす 記す る すす に すす 呈す すす も bL す すけ Tbf 了 すす イヒ U] 
tbhehehdh す 記す に リ 上 中 回 ヽ 
1 還 加 王 も に ビ hF ーー リ デ ] 呈 上 すす で † す ヨコ ヨコ ュ ヒュ ョ コロ コロ ョ ロロ ピロ ピロ ョ ビス アイ 中 イオ で イイ に 回 選 す オモ すこ ビビ ョ トミ 1 dd わい | 
ダス 中 タジン に すこ に 回 記す すす も て ロ 

11 由 トビ hF り 当 すす 宮 和 すす すす キキ キキ キキ キキ キキ キオ すす すす すす キイ オイ キオ すす すす すす すす キ キキ キ で キキ 
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TIT ワ フワ ウ ユ ワウ ワウ ワウ ワ 〇 ヤ †0 イ カポ ボ ダ ヤ ooooeon 


BY う 


ナーーーーー 1 
へ 行 つ て み ま し よ つ 私 が 向丘 高 物 

RUN し て 、 な に か キー を 押す と スタ  『 理 部 前 部 長 の 
ー ト 。 ま ず 、 自 分 の 車 の 色 を 選択 (0  『 今村 高志 で す 。 上 
7 ずる る 、 ド ライ ブフ 0 の 0 はじ まり だ 。 TL 
|4I6」 キ ー で 左右 に 移動 し て 、 障 害 物 を W-  」 
ょ け な が ら 旗 を 取っ て いこ う 。 旗 を 10 。 1 
本 取る と 、 画 面 が 変わ っ て だ ん だ ん プ 。 
キミ に な っ て くる 。 まこ ここ ここ ここ ここ ここ ここ ここ 7 


右 変 数 リス ト 。SM…… チ エッ フサ ム 用 

K…… キ ー 入 力 ・ CO…… 自 分 の 車 の 色 

SC…… ス コア 。 LN…… ド ヘッ ツ ド ライ ト の 長 さ 

HS…… ハ イス コア 。C し …… ヘ ペッツ ド ライ ト の 色 

PL( )…… 走 行 音 用 アジ ド レス ・ 画 プロ プラ ム の 説明 

CHS( )…… 各 キャ ヤラ クマ 。100-140 メイ ンプ ログ プラム (〈 車 の 移動 
し F…… 自 分 の 車 の 数 M 等 ) 

LV…… レ ベル の 数 ・150 障害 物 に あめ だ つ だ か ゃ 
X…… 障 害 物 の X 秦 禁 。160-190 旗 を 取 つ だ と き の 処 理 


BOTO 10 


FTC ド ド :M=(E=29) 一 ( ド =28B) : ビ = ビ ー1: PLAY "BE" 。 


*・ 200 一 220 
・230 一 300 
。 310 一 430 
・ 440 一 490 
・500 一 540 
。 550-680 
・ 690 一 710 
・720 一 920 


障害 物 に あ だ つ だ と き の 処 理 


ゲー ム オ オー バー 負 理 


4 面目 。 つ 一 お 、 な ん だ か チラ チラ レ 


だ 妙 お 物体 が プ キ ミ 。 


ソソ ー、 ソフ ソ ク 、 ワ フ ワク の 2 画 。 


この タコ み だ い な エイ リア ン が ガ プ キミ 。 


写真 を 見 て で もらう と わか る と 思う け 
ど 、 こ の ゲー ム の 採用 る され た 理由 は 
ライ ト で 照ら され た 部 分 し か 見 えな い 
ムズ さき さ 、 か つ 、 面 が あがる と プ ブ キミ な 
キャ ラク タ の 出 て くる スリ ル に ある の 


だ 。 た だ だ 旗 を 取っ て いく だ け で は な い 


と ころ が 、 わ し ら 好 っ きゃ ね ん 。 


ご の プロ グラ ム は 、 マ シン 語 を 使用 し ま 
すず ので 簡単 な チエ ッ フ サム が 付い て いま 


難 デ ー タ 読み 込み ・ 初 期 設 定 。 す 。 プ ログ ラム を 打ち 込み まし だ ら 、 ガ が 


画面 設定 等 
マシ ン 語 デー マタ 
キャ ラク マタ データ 
サウ ンド デー タマ 
デモ 画面 表示 等 


。 一 打ち 込む こき の 注意 


FL(1+M) 


・ な ら ず セー ブレ た の ち に UN を 実行 レ 
s。 て こ だ さ い 。 も し レ し デー が 誤 ま つて いる 
。 場合 は 、Data Error と 表示 され ます 
・ の で 500--540 の 各行 の アー タ を チェ ッ ク 
。 し て ご だ さい 。 
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BEEF:LUCATE Q。QsFOR TO TO 5OISODUND RND(1)*15Q0。1 iCOLOR 。MOD(T。 デ ) 1 SsNEXT 
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東側 ー」 (新潟 県 ・ 風 来 ) 載 は だ あたし も 悪い けど 、 書 いた あな た が も つと 悪い 。 八 つ 裂 きも ん だ ね 。3 カラ ブラ ム 。* 
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COLUR 。0。3gLF= ニ レ Fー1』 エ F 上 F= テ ー1 THEN でき 

COLOR 78LOCATE で ロコ 。 15sFRTNT LFiiE=USR (まま 504D) 』iGUTO 4609 

FOUR I=5OQOO_ TO 1000 STEF 一 10Os SHUND IT。lgNEXT 

COLLOR SiLOUCRTE ア 。1O0gFRTINT "GAME OVER "gsFOR IT=O TO 4000sNEXT 
COLOR 7gTF SCE=HS THEN ESBO 

HS=SCsLOUCATE SS4。BgFRINT HSisiLUCATE SSgiFRTINT "YOU Bt HH ュー5COFB 1 7 
RESTORE 690sFOR IT=O_ TO 16sREAD SD。LiSUUND_ 158B4+SD。 LEsNEXT 
LOUCATE 5。1SgFRINT "TrFy aqain(y/n ロ ) 信 け 

FICE EsgON (( ド =1S1)+ す (EE110) で)+1 GOUTO 2S9O。 70。 さ 300 

CLSsFRINT "Bye bye "PEgEND 

FORE *$CAOO。igFOUEE OOgUCULUR 6。OaCLSsiTEMFOD 70 

DIiM CH も (SS)gFL(O) = も 5OSF FL (1 ) = 和 ま S5O61』 FL (で ) = まま OO5F 


FOR IT=O_ TO 1:CH ま (T) = ニ リ ウ チリ ォ CHR 生 (うう 1) +CHR ま (で 9) すじ CHR ま ( 全 9) エリ 9 テリ gaNEXTa CH まま (で) テモ リオ キリ 


FOUR T= 和 SOOO_ TO も SOG6EsRERD 本 RURL ("まり + 人 も )』FOEE 1。RzGMESM+RRsNEXT 
IF _ SNE EE1185S6 THEN EEEFEFRINT "Data _ Error PsEND 

FOR 1= 和 まま DSBB TO ま DSRFsiRERD 生 sFOEE TMRL CO" まり 人 本) sNEXT 

IF _ DFHEO_THEN GUSUE 7EO: DM 1 

CLSkRESTORE 7Z7O0gLF ニ 3 ュ GUC テ OOE LV=1』 じじ = 日 

ME / し ULAUE の ら 3PCINIT JNNPUT し ULOR や りこ 7)" 

FTCE EETF EE4B_ OR EESS THEN _ 40 

CU ロニ =E ド ビー48 COLLOUR 0OgCLG 

FOR Im=O TO 1EgRERD Y。 も 。MCECOLOR_ MCELOCATE ES YEFRINT 人 第 5:NEXT 
LOCATE ES BiFRINT HSi 


READ LN。CLiTF LN THEN LVMELLV+1gLOCRTE SE 17aFRINT LVMigRESTORE 600: GOTU 44 


FUR 1= ま $D60O TO ま D61F:RERD 人 FODOEE 1。VL ("まり 吉本) : NEXT 

FUHR 1= ま じ C フ 6 TU まじ C6S5 STEF' 65 

FR J=1 TO (LN+1) SEFOEE T+TJ。CLEFUDEE エ + ォ リー ほ S。CLENEXTELN=LN+ 1 : NEXT: LN=Q 
CDLOR QOJOELDCATE QO。OEFRINT SFPC(4) 5 "ロロ "ISFCE(11)5 "ロロ "ISFC(1 さ ) = X=6 
E=USR ( ま 呈 0 計 1 。。CO) saFHR TO TO SEEE=USR( ま 呈 O0O。。 は SB) sNEXT:i BOTO 11Q 
DATA BZ,50。QOD、CE。 CS。FF。 AG6。 OO0。B1 BE4。 で さき 。 04。 7。 GO。6F。 0O。0O9。 BC。 CO 。FF 
DATA SG6。FOJCE。C1。1F。 RG、 SO 7。00。09。BC。CO。FF 6。F6。 CE。C き 。 BB。 6。 OO 
DATA AB。O1 。QB。2O、 人 BE。 2 で 1.B0。 CA。 さ 9。 CE。 じ 7。 BB。 7。00。 27。 01 7。2O0。A7。21 
DATQ CE, じ さ 。 BB 日 6。B1 7。 OO0。4C。 701。4 じ 。 7。 2O。4 じ 。 人 7。 で 1 。 さ 9。 CE 。、 ビ さ 。FF 
DATR 6。QO。B1 BE4。 人 でき OS 6F。 OO0。O9 BC CO。FF。 おら 6。FS。 肖 9。FF。07。FF。 0 
DATA 1F。SF。 GS き OS 64。7D。7 フ F。66。FB。FC。C4。40。 26。EE。FE。 66。055。 04。ED。F5 
DAT FF。FF。E じ 。0O。 OO。B フ 7。 AF 。FF。FF。 計 7。O0。 OO。7E。7E。7E。 7E。 40。 40。40 


DATA 2。、"NIBHT"。 ら るり DRTVE "6。 ら 。"HTー リ 4。2。 "BCORE"。 人 4。10。 "BCORE"。 ら 6。11。 "0"。 プ 


DARTO 1S。、 "SCENE 14、 |) 1 、/ ア 16、 LEVEL の 17。 し 。 メ 
DQTO 19。 "し LEFT" 3。 0 の,“ の Ke 上 ま 電  、2ETw ば SPIESDNYEGEOHLtGEB3S す 
DaTA OO。15。1F。 SF SE OS 64。2D。7F。66。FB。FC。C4。40。26。 BE 。FE 科 MMHNRNNHNNRIRHHH 

DATA 66。05。04。ED。FS。FF。FF。EC。 OO。RO。 ROD BZ。F 」FF。FF 』 う 7。 00 昌 m mm 

DATA 004EB。 OO04。01。09。1D。1D0。1D.1D0。10.BO。CO。CO。CO。 CO CB。 DC 
DaTA DC。1D。1F。1F。OF。O1。O01.01。01。DCJDC。 FC。FC。FB。CO。 CO。 に O 
DATA OO0。06。B0。01.00』10。00。00。00。41.01.8BO0。O00。08。00。00。00 
DAT BE 作 1 由 (0) CO) * (7) 1 7) m (.) 1 8C) 8 a OO) () q GO) 由 OB aq 0)() ョ BC 。 () 1 
DATR OO0」 OS OO 00。 07。 0 10。 ビブ ビエ F。EF。18B。04.FS 08。 44。E4。F7 
DATR FD。9F。 ジ ブレ 98。 ビビ ES 06。09。 18B。FB。E7。 0B。 ジオ 4。 どき さ 。10.0B。90 
DaTA 1。1 

DATR 0。 4 ー18B 人 4 人 4 0。 デ ュー15B44。 1 0 ジュー158B4。1。 ロ 15 

DATA BOD。 プ 7。0。 7。B0。 7 

DRTR 0。 4。ー13584。 4。 0。 ビ ュー159B4。 1。 0。 ビ ュー1584。1.0.15 


FOR I=O_ TO eoOsCOLOR_RND(1) 4+4 当 LOCRTE RNDK1) 1。RND(1)*EOgIFRINT "kPasgNEXT 


RESTORE BSOILOUCATE Q。 呈 COLOR 互 

FDR It=O TO 1 

FOUR JO TU 4:RERD 仙 ま sFRTINT SFC(4+TXG) s 人 系 =NEXT 

FRINT:FRINT:NEXT 

LOCATE 15。SOEFRTNT "hy T。 1mamura" 

RESTORE 69O:FOR T=O TU 16:RERD SD。L:SODUND 15B4+SD。L* 全 NEXT 

TEMFD OiFOR IT=100 TO 60OO_ SBTEF SO SODUND 1T。1:NEXT: TEMF'D 7Q 

COLOR 7:LOCATE 9。22EFRTNT "Hit any Eey1"s シン 

PITCE Ez:TF E=O THEN B10 

RETURN 

DQTR ロロ HH ロ ロロ ロロ ロロ nn 紀 

DaATA ロロ ロロ ロロ ロ の 
が 


DRTn ロロ ロ 口 ロ ロロ HH ロ 
DRT 全 口 ロ ロロ ロロ ロロ 
DRTA ロ HI PHH ロ 
DaT 人 QR ロロ ロ EHH ロロ ロロ 
DRTA ロロ ロロ ロロ ロロ 
DRTA ロロ ロロ ロロ ロロ 全 ( 稀 
DaTA ロロ ロロ ロロ ロロ ロ 
DaTa ロロ 品 ロロ ロロ 口 ロロ HH 


(ね 旬 旬 
品 


// 


oog/@ 川 


て SM 
の 誠実 さ の バズ ル 


お な じみ 、PASOPIA 7 で 数 字 の パ 
ズル し か 作ら な い 、 広 島 の 学校 の 先生 
・ 味 (た お ) くん の 作品 。 は っ は っ は 、 
先生 を くん づけ し て し まっ た 。 で て も 、 
わし と 同じ 年 だ ども ん ね 。 

と て そろ て 、 要 する に 数 字 パ ズル で あか 
る 。 だ が 、 今回 の は こと に 根 が てく 、 
伝統 の シブ サ さ え ぇ 感じ る 。 わ びさ び 特 
集 に 入 和 よ うか と 思っ た は ど だ 。 


/ を 避難 させ て お いて 、 
8 を 入れ る ん だ も ん ね 。 
青い ブロ ッ ツク は 障害 物 。 


Do 


JiNOXA(t さ ざさ 。 
人 di で 全 0N ご 計 00 
り 回 てこ ごい 0 は さ 「 ッ ヤ 


問題 の パタ ー ン は 9 
つ あ る 。 とり あえ ず 、 
タオ 製 だ が 、 自 分 で も 
作 析 る の で チェ ッ ク ボ ポ 
イン ト を 参照 し よう 。 

テン キー で 上 下 左 右 に 黄色 い コ マ を 
動か し 、 バ ラバ ラ の 数 字 を テン キー の 
配列 と 同じ よう に な ら で か えれ ば 1 面 
5 だ SO CC すこ と は て きも 
ひく 《 く こと は て き な い の て .、 困 っ て し ま 
っ た 人 用 に 自殺 キーIMI が 用 意 る れ て い 
る 。 制 限 時 間 は 15 分 。 ミ ス 4 回 で 1 面 


に あど ろ て しき 
画 変 数 リス ト ・ 360 一 380 キー 入力 処理 う の て で て 、 の か ば 
A( , )…… 各 マス 目 に 何 び ある か ガ 。 390 一 470 コマ 物 動 処理 = 
KX.KY…… コ マ を 表示 する 座標 ” * 480-500 完成 の 判定 の / ン 
K……: 各 コマ の 番号 ・ 510 一 540 面 ク リア 負 理 |REIURN 
E…… ミ ミス の 回 数 。 550 一 580 ゲー ハム オー バー 処理 レイ は LRETURN。 
X.Y…… 黄 色 の コマ の 座標 ・590 一 750 コマ 表示 
X1.Y1…… 環 色 の コマ の 座標 増分 ”・ 760 一 860 問題 の デー タ 
wet 面 数 (問題 番号 ) 。 較 チェ エン フ ボイン ト 
F-……- 数 守 の コマ ガ 秘 動 可能 ガ ・ 問題 の パターン が 、 770 行 以 降 に 入 つ て 
イ |……- 制 限 時 間 。 い ます 。 0 は 空白 、 1 一 9 が 各 コ マ 、10 
一 プロ プラ ハム の 説明 の が 黄色 の コマ 、11 が 青色 の 障害 物 に な つ 
10- 20 初期 設定 ・ て いま す 。 自 分 で 面 を 作 つ て みて も お も 
30- こ 110 初期 画面 設定 。 し ろ い と 思い ます 。 い い 面 が で きま し だ EXT : NEXT 
120-300 ゲー ム 画 面 表示 ・ ら 、 ボ ポシェ エッ ト に 送 つ て ぐだ さい 。 39 "カト メ か 
310320 マイ ム 表 示 。 うま ぐい け ば 、 プ レイ バッ フク チェ エッ 
330-350 ミス 処理 - クボ イシ し レビ の り ま せ す 。 (エイ キチ ) 


] 


| MI 上 有朋 月 卓上 朋 朋 月 卓上 月 胃 胃 上 W 旧 目 


数 字 と ニラ メ 
ッ コ し て アイ 
デア を し ば ぼり 
だ し て いま す 。 


最近 は 数 字 を 使っ た パズル は か り 作 っ て 
いま す が 、 今回 の は 解け な いと 前 に 進め 
ませ ん か ら 、 ま あ 、 告 い 人 で 30 分 、 お そ 
い 人 で 一 生か か る で し ょ う 。 数 と いう の 
は 、 な に か 魅力 が あり ます よね 。 数字 と 
エラ メッ コ し て いる と アイ デア が 浮か ん 
CC く る の で す 。 ポシェット に の っ た の は 
みん な 数 字 に 関わ る も の は ば は かり で す 。 


間 ・) 休 5 事 Ei 


1 2 


そる くく 内 UUB >> ふ > 


4 は いつ 。 い つの ま に が 最後 の 一 。 バ 
シッ と は めこ め ば 、 次 の 面 で す 。 


19 WIDTH 49:SCREEN 2:DEFINT A-Z 
29 FOR M=9 TO 8:FOR N=9 TO 8:A(M,N)=11:N 


49 COLOR 5:CLS:LOCATE 13,.9:PRINT "< く < く < MOO 
B >>>“" 


<MOOB〉 パズル ゲー ム は 大 好き 。 残 意 だ つた の は 2 面 し か やら な か つ だ こと 。 な ん で つて 原稿 炎 切 日 に ゲー ム を や つ 
て る と 原稿 が 書け な いん だ も ん 。 今度 め つ ぐり 楽し も うつ と ! 


59 LINE(63,13)-(235,185) ,7.B:LINE(64,14) 

-(234,184),7,B 

69 COLOR 7:LOCATE 34.8:PRINT "8":LOCATE 

34,14:PRINT "2" 

79 LOCATE 31,11:PRINT "4 6" 

89 LINE(257.91)-(294,91),4:LINE(276,73)- 
(276,199) ,4 

99 KX=265:KY=89:K=19:GOSUB 619 

199 RESTORE 779:FOR N=1 TO 7:FOR M=1 TO 
7:READ K:GOSUB 699:NEXT:NEXT 

119 GOTO 569 

129 "モン タイ 

139 S=1 「 
149 E=9:COLOR 3:LOCATE 32,19:PRINT "MISS 
9 " 

159 IF S>9 THEN CLS:LOCATE 13.19:PRINT" オ 

ツウ カレ サマ テー シ タ ! 1!" :END 

169 COLOR 4:LOCATE 31,2:PRINT "SCENE":S 
179 ON S GOTO 189,199,299,219,229,239 ,24 
9,259.269 

189 RESTORE 789:GOTO 279 

199 RESTORE 799:GOTO 278 

299 RESTORE 899:GOTO 279 

219 RESTORE 819:GOTO 279 

229 RESTORE 829:GOTO 279 

239 RESTORE 839:GOTO 279 

249 RESTORE 849:GOTO 279 

259 RESTORE 859:GOTO 279 

269 RESTORE 869 

279 FOR N=1 TO 7:FOR M=1 TO 7:READ K:A(M 
,N)=K:GOSUB 699 

289 IF K=19 THEN X=M:Y=N 

299 NEXT:NEXT 

399 WHILE INKEY$<>"":WEND 

319 "コマ ノイ ト ~ ウ 

329 PLAY "04L29GEGEGBL8G":TI=TIME+999 

339 COLOR 2:LOCATE 31,22:PRINT"TIME":T1- 

TIME:IF TI-TIME<=9 THEN 359 

349 C$=INKEY$:IF C$<>"M"' AND C$<>"m" THE 

N 379 

359 E=E+1:COLOR 3:LOCATE 32,19:PRINT "MI 

SS":E 

369 IF E=4 THEN 559 ELSE PLAY"02L4C":GOT 

0 179 

379 X1=(C$="4")-(C も ="6"):Y1=(C$="8")-(C$ 

ョ 230) 

389 IF (X1=9 AND Y1l=9) OR A(X+X1,Y+Y1 )=1 
1 THEN 339 

399 F=9:IF A(X+X1,Y+Y1)=9 THEN 459 

499 IF A(X+2xX1,Y+2xY1) く >9 THEN 339 

419 IF X+2xX1=1 OR X+2xX1=7 OR Y+2xY1=]1 

OR Y+2xY1=7 THEN F=1 

420 A(X+2xX1.Y+2xY1)=A(X+X1 ,Y+Y1 ) 

439 M=X+X1:N=Y+Y1:K=9:GOSUB 699 

449 PLAY "05L32C":M=X+2XX1:N=Y+2xY1:K=A( 

X+X1,Y+Y1) :GOSUB 699 

459 A(X,Y)=9:M=X:N=Y:K=9:GOSUB 699 

469 X=X+X1:Y=Y+Y1:M=X:N=Y:K=19:GOSUB 669 

479 A(X,Y)=19:IF F=1 THEN 359 

489 カン セイ カ 9? 

499 T=1:FOR N=3 TO 5:FOR M=3 TO 5:IF A(M 
,N) く <>T THEN 339 

599 T=T+1:NEXT:NEXT 

519 "オォ ワリ 

529 S=S+1:PLAY"03T129L16AP16AP32AP16L8AP 

8" , "04T129L16EP16EP32EP16L8EP8" 

539 PLAY"03T129L16A#P16AP32A#P16L4AP16BP 

32L16BP32L3C#" 。 "04T129L16FP1 6EP32FP16L4E 

P16GP32L16GP32L3A" 

549 FOR H=9 TO 3:FOR CL=7 TO 3 STEP -1:C 

OLOR=(3,CL):FOR I=9 TO 399:NEXT:NEXT:NEX 

T:GOTO 149 

559 PLAY"03L16BA#AG#GF#FED#D" "02L16BA#A 

G#GF#FED#D" 


穫 テ っ に 
表 個 19 


769 ' モ ンタ ~ イ ノ 


S569 LINE(89,167)-(216,175) ,9,BF 

S579 COLOR 6:LOCATE 19,21:PRINT"PUSH "RET 
URN'′ KEY“ 

S89 IF INKEY$ く >CHR$ も (13) THEN 579 ELSE 13 
り 

S99 "コマ ノ スウ シン ~ 

699 KX=24XM+42:KY=24XN-8 

619 IF K=9 OR K>=19 THEN 639 

629 LINE(KX,KY)-(KX+22。KY+22) ,5,BF 

639 ON K+1 GOTO 649,.659,669,679.689,690 。 
799,719.729,739,749.759 

649 LINE(KX,KY)-(KX+22.KY+22) 、3。BF:RETUR 
N ' 

659 LINE(KX+11.KY+7)-(KX+11.KY+15) ,2:RET 
URN 

669 LINE(KX+8,KY+7)-(KX+14、KY+7) ,2:LINE 
-(KX+14.KY+11).2ELINE -(KX+8,KY+11).2:LI 
NE -(KX+8.KY+T15),2:LINE -(KX+14.KY+15),。2 
・RETURN 

679 LINE(KX+8,KY+7)-(KX+14.KY+7) ,2:LINE 
ご (KA すす 4。KYTIS) 22LINE -(KXT6。KYT15) 2 し 1 
NE(KX+1 1 ,KY+11)-(KX+13,KY+11 ) ,2:RETURN 
689 LINE(KX+8,KY+9)-(KX+8,KY+13).2:LINE 
-(KX+14。KY+13) 2KLINE(KX+12。KY+/)-(KX+12 
* 民 を 15) 21RETURN 

699 LINE(KX+14.KY+7)-(KX+8、KY+7),.2:LINE 
ー(KX+8B,KYTIIJ.2:LINE -(KXT14。KY す 11) 22 し 1」 
NE -(KX+14.KY+15),2:LINE -(KX+8,KY+15) ,2 
・RETURN 

799 LINE(KX+14,KY+7)-(KX+8,KY+7),2:LINE 
-(KX+8。KY+T11).2:LINE -(KX+T14。KY+T15) 2.B: 
RETURN 

719 LINE(KX+8.KY+9)-(KX+8.KY+7),2:LINE - 
(KX+14,KY+7),2.B:LINE -(KX+14。KY+15) ,2:R 
ETURN 

729 LINE(KX+8,KY+7)-(KX+14。KY+15) ,2.B:L1 


NE(KX+9.KY+11)-(KX+13,.KY+11).2:RETURN 


739 LINE(KX+8。KY+7)-(KX+14.KY+11).2.B:LI 
NE -(KX+14。KY+15) ,2.B:RETURN 

749 LINE(KX。KY)-(KX+22。KY+22).6.BF:LINE( 
KX+4。KY+4)-(KX+18.KY+18) ,1 ,B:RETURN 

759 LINE(KX,KY)-(KX+22。KY+22 ) , 1 、BF : RETUR 
N 


779 DATA 9 


>1。2。3。9。 
>9、9.9,9。 


9 。9,4, 


や ーー テー の や ・・ 


の や ・ きど どの < 


< ウニ ウニ 会 話 シ リー ズ 〉 「 こ ら つ 、 な ぜ お れ を そん な に じろじろ 見 る ん だ 」「 だ つて お れ の 名 前 は じろう だ も ん 」 (福岡 県 グ の 
・ 桜 木 太 郎 フ ン ) 如く だ ら ね エー と 言い つつ 載せ て し まつ だ 。 な ん ちゃ ら か ん ちゃ ら ウ ニニ つて ほし いな 一 。2 カ ラブ ラム 。 立 


ZVgosvg@ 


gl ビシ ツ ビ シ ツ と 空 
"= の 試合 に エキ サイ ト 


ポシェ ッ ト No1 の 『BOXING」』 で カ 
シオ の 人 を うな ら せ た 林 貴 改 格闘 技 大 
臣 の 新作 。 今 度 は 空手 だ 。 

RUN す る と 、 タ イト ル デ モ (この 途 
中 て |R| を 押す と 前 回 の 継続 に な る 。 で 
も 5 は じ め て の と き は 押 き ない よう に )。 
デモ 終了 後 、 ち ょ っ と の あい だ 、HA 
ZIME.// と 表示 きれ て 、 ゲ ー ム ス 
ター ト 。 プ レイ ヤー は Q で 相手 は 現 だ 。 
右端 に 表示 され て いる の は 残り 時 間 。 


し NM W 8 有朋 9 8 BB 8 8 W 8 8 8 8 W W g 】 


| の 
| 
基 
沖 
と ー 
> 


1 

し 釣 』 

て リ 

トノ ウラ 01 

いん プ 対 ! 

て か ラ 角 i 

す よ ソノ 人 角 』 

ね ろ ク と 

2 B 

変 お の と ゲ ど 邊 

ちり クタ |&W 

2 の ん まん 0 し LA 

仙 は 久 だ "を ` て で 

1 ん 2282 る 和 き 2 も 5 を 7 

バ 館 ( 

ミス な っ かま と な いさ いい | かみ 

『 き を も て も すら ん ぼ ば てろ 1 な ミ 

40a41 1 

* う 32 と り 03 大 CtRR 
0 「 


し 3 ! 8 ! 1 1 1 % 1 1 ! 3 I AL A ji 2 


STOP 


41 キー で 突き / ん 一 、 こ の 突き に は 実は 秘密 が ある の だ 。 


1 キー で 相手 の 攻撃 を 受け 、 [3] キ ー 
で 突き を 〈 0 だす 。 技 は 、 は っ きり い 
っ て 突き し か な い 。 ま あ 、PB の 画面 トー も し 還 と 

で 飛び げ り や まわ し げ り は むず か し い p。1 本 を 取る ーー の ゆ 較 法 
だ ろう な あ 。 、 碧 の で 見 けず 


試合 勝つ ご と に ポー ナス ステ ー ジ 
も ある 。 と ころ で 、 あ る 勝ち 方 を し な 
いと 、 壮 い ぜ い 3 試合 と まり 9 が ん だ っ 
て C。 その が は" 教え な い 。 


一 変数 リス ト > 00 合 PP ・ 品 2 「 始 め |」 表 示 

A…… 相 手動 き 用 ・ P…… 演 武 キ ー 入 力 待ち ・ 5-- 20 デモ 、 初 期 設定 ・ 避 8 ルー プ カ ウ ンマ 

B.…… 牛 位置 。 〇 …… み わら な ご どの 割れ 表示 。 25 試合 数 表示 ・P9 ルー プ カ ウ ンマ 

D… 演 武 選 択 < 農 …… か わら な どの 割れ 数 ・ 30 時 間 せ ぎ ・ 画 チェ ン フ ボイン ト 

E…… ス コア ・ SS$…… 割 れ キ ャ ラフ クマ ・ 35 「 始 め | 」 表 示す る か ガ の 判定 ・ 作者 フン の 話 に よれ ば 、 試 合 中 "受け 。 
F…… ス ベ シ ャ ル ボ ー ナ ス 。 … 試 合 時 間 。 40 キャ ラク ンタ 表 示 、 キ ー 入 力 。 の 1 キー を 押し て も 「 受 け ,」 が で き な い 
G…… 1 本 ・ 技 あり 判定 ・ U…… 突 き の 判 定 フラ ブ ・ 50 一 80 プレ イヤ ー の 攻撃 ・ と き が ある けど 、 こ れ は バグ で は な こざ 
H…… ハ イス コア ・ V…… デ モ 。 85-115 相手 の 攻撃 ・ うっ と 「 受 け 」 を し て 判定 勝ち に 持ち 込 
|…… プ レイ ヤー 1 本 ・ 技 あり の 数 。 W…… デ モ ・125-130 1 本 ・ 技 あり 表示 。 む お と いう セコ イー 剛 ち 方 を で き な い よう に 
J…… 相 手 1 本 ・ 技 あり の 数 ・ X…… ル ー ブ カ ウン タ の 終値 ・150 一 170 勝ち ・ 負 け ・ する だ め な ん だ つて 。 そ れ か ら も う 1 つ 、 
K-…: 難 易 度 ・ Y…… 突 き ・ 受 け 数 。180-320 演武 ・ 7 試合 目 ひ ら は 少し で も 長く | ほ キ ー を 押 
に es ポ = 駐 。 2… ル ー プ カウ ンマ ・ 350 スコ ア 表 示 。 し て いる と 反対 に や られ ちゃ いま す 。 
M…… ハ イス コア ラー の 段数 ・ $…… 演 武 の キャ ラフ クマ ・ 355 ハイ スコ アカ の 判定 5 (も え ) 
N$S…… ハ イス コア ラー の 名前 ・ 瑞 プ ロブ ラム の 説明 。 品 1 ボー ナス 表示 ルー チン 9 


生 テッ 〈 ウ ニ ウ ズ 会 話 シリ ー ズ 〉 「 こ の ぼう し 、 ど いつ (ドイ ツ ) ん だ ?」「 し らん す (フラ ンス ) 」「 お らん だ (オラ ンダ ) 」 ( 埼 
ヶ の "に に - 
昌 人 1 あ 玉 県 ・ 川 島 義隆 フン ) 如 国 の 名 前 シリ ー ズ ね 。 も つと も つと 考え て ネ ! 1 カラ ブラ ム 。 


3 FOR Y=1 TH ji 下 
HR 中 FD 12: 和 を 
"0 Karate "9" 

提 PRINT WID(H1): 
: NEXT 上 RS 
維 : EXT W 有 F 
KEY="R" 「 有 FM? 
に 

15 D-WK ニ 3 に 1: 時] 

上 = 
Z9 PRINHT " HE"TiH 
に HH た 
25 OSUH 維 : PRIHNT 
LSRZj 有 Hi "siai" 
HH ビビ ロゴ 

39 FOR T=29 TH 1 5 
TEP -.、5: IF Hz3 
: =78- け 1: ROSU 
H 培 

35 IF BA BONSUBH ま 


科 PRIHT IE PRIHTE 
ORZ LORD 
1 L5R95 ENTTi 
・ IF KEY*TS TH 
EN 85 

9 PRINT [SR25" 9 
ーー!1 時 。 
5 iF HBH125 放 12 

33 時 内 仙 【F 人 EEY= 
3" THEN 9 

59 IF RH 愉 HH/13315 

PRIHT [SR6i"・f 
*。 RUFH 的 

5J PRINT CSR6:""*" 
js RUSUH 堆 : PR 
INMT CSR65 TFT 

介 に 2 1.5: 【F 
KR 内 を も b15 iF T> 
邊 IF Tc6iB-15 1 
=1+。JiE キ +lES 

生計 『=35 作 8 

9 IFO 125 

3) jF RWKz2「 肝 
NN 13 介 

電 PRIMT ESR35 "< 

ュー リキ 1 


息 の 


表 何 * 


3 F KEY に 1"! 思 】 
NT 
=f せ IF FR 代 人 U 
71)*。1 「『 肛 上 H158 

1 間 PREIHT CSR1I 97* 
:: RUS 肛 郡 : PR 
NT LSE TP 『: 

115 JJ+1: TFR 
HH3325 25 に J 
 J 

125 慌 SUB 約 :i 王 
1 PRINT ESR45 * 
1POn! Pi 

138 【F に 25 PREHT『 

3Za d『1's 

156 EEF KK 【F が ポ み 
EXT 「: PRIHT 
: PRIHT * Hante 
1 ii RUTB 168 

15J SU 約 : PRIHNT 
chOn 5 

ip8 FEzJi PREINT 『 

Wake'ii RUTB 35 


B 
165 PREMT "gacnt ii 
0-D+i:(- 上 DTE EK ポ 
+1 = に RUS 
UB き 1 
1 條 FF 半 底 (H/16)=。 
1j 介 7 
108 PRIHT "0-0 Ent 
0=0*s: HOS 旭 き 
eH' ニ 
185 IiF DD-25 PRINE 
Kaga『a ji: ロ ー サ 5 
本 は 
19# IF D= 邊 PRINT 
KOOr1 "5 は 補 : た 
" 間 剤 "5 を )『 
199 IF D- お 5: PRINT 
niOock"ii 呈 條 本 
Ng 0 
0 暗 IF Dj PREINT 
151 "3 5 は も 。J* す 
Hi い アセ 
MO jF D-1095 PRINT 
"teKKOtU "5 は も: 
"用 5 を sbD 
1 


1 jF は - 革 「 有 FN 788 
5 PRENT ) gari Ti: 


0SUB 9: PRIN_ 


すす 1 
5 

2Z6 PRINT [SR9i" ロ 
ss ト 眼 P=2 TU 5 
SIEP .7i IFK 
FET 半 AT Pi 
5UTU 238 

2 9= INTPI BUTO 2 
39 


738 PRIHT CSRWT 
js IF KEY="* TH 
EN 278 
755 PRINT ESRW3T 
jsR= INHT( R 間 内 
5。540): IF R211 
1R=1 1 ' 
『 糧 F 限 時 2 OREP 
RINT L5RU55 も お: 
EAI は 
24 LE(R-1 う *1 開 : 上 
11 THEN ZIB 
258 RUSU 約 : PRIHT 
ParfertE Ti 
nlSUB 維 
Z9J PRINT " 
KPYI': 
369 上 = INT( RH 夫 1 
1 の) 
?565 PRINT [SRWFiiL 
寺 *1E38 IF KEYT= 
* THEN 26 
278 RUSUB 寺 : 50T0 
3 電 
298 PRI 肝 ) u5i 30『 
051 1 < 量 7 ・ 
=9s 明 
295 5USUH 的: PRIHI 
LSE1i POPE LESRB 
: ま 3: メニ RUSU 
H 者 


1 前 間 


395 B=H-1: PRINT [5 
RB も 5 
3 提 IF KEY*""E FB 
= 幸 中 1 PREMTE 
SR25"-・T5s iFB 
=4 [HEN 2 
3 的 IF 時 1 「 用 W 7 
318 所 IT [S 昌 3 "pj 
お "Heta PE RT 
H 158 
379 OSU 的 : PRINT 
時 | 困 4 
ミ E キ +/ES 
358 GOSMUB 9: PRENT 
* Gore"5Eii B 
SU 的 : IF Ei)J 
HEMN 人 5 
33)J jiF 上 Hi INPUT 
Na 」 時 > 件 圭 : 星 
Hi jiF M9j 任 19 


P1 
1 RUSUB 約 : PRENI 
* BOTMS "5L5 上 = 
E+Li RUTH 維 
PJ 
提 還 SUB 的 : PREMT 
SR3 "HaZ1 和 6 
HL に ml 本 ロ 
UTU 客 


PU 
18 FORZ 電 THRIH 
EAT ac RE 
TURM 


Pd 

18F0 の 介 TH 3506: 
NEXT Zi PRIHT 
: RETU 


4 ボー ナス ゲー ム へ 、 か わら 割り 。 画面 を を て に し て 見 よう 。 キ 
を だ だ いて か ガ がわら が 全部 割れ る と 数 字 が 回 る 。hit any keyl 


〈 ウ ニワ ウニ 会 話 シ リー ズ 〉 「 ね え 、 こ の ハン グラ イダ ー ど れ ぐ らい 飛ぶ の ? 」「 そ うだ な あ 、2 時 間 半 ぐら い だ あ 」 ( 北 沿道 シオ 
・ 中野 尚 % ク ン ) 婦 ま だ まだ 、 だ じゃ れ シ リー ズ 。 本 来 の ウニ ウニ を 大 切 に し て ネ 。3 カ ラブ ラム 。 立 


\O0-gg@ 


OOo 


TO 


ギャ セ ヤン ブル の きび し レ 
さと 楽し さい つば ざい 

この ボー カー の ルー ル は 、 な ん と 、 
実際 に 現金 を か け て 地下 室 で 行わ れ た 
非 合 法 の ポー カー ゲー ム 機 と 同じ ルー ' 
ルル が の だ / と いっ て も 、 だ だ の ンー へ 


4^ ム キミ の ぼ 礼 。 右端 の ド ツ ト を [113| で 数 字 な ど に 変え て 、 カ ー ド の 選択 を し て い ぐ 。 


STOP 


さ ヒコ F 可 半 


人 な わーい / ズ スリー カー に で きつ うつ 。 さて 、 ダフ ル つ ちゃ う ぞ 。 


D STOP 


]・:・Dl 


ュー ュー A ム ここ で 1 を 押し て ダブ ル 。 あ た だれ ば 、 さ ら に 大 きく な る の だ 。 


遊び と し て も ゲー ムセン ター に お いて と ころ の 札 を 捨て 
あっ た けど ね わ ね 。 る この CC きる の 8。 の と きだ と 。 
は じ め に タイ トル 、 持 ち 点 が 表示 さき キャ ン セ ル 。 ! の と きだ と OK に な る 。 


れ 、 か け 点 を 、 入 力 。 か け 点 は 0 や 持 それ で いい と き は 、 札 の 結果 を 表示 
ち 点 より 多い と だ め 。 入 力 が お わる と 、 し て 、 役 を 調べ 、 役 が な いと 次 の 勝負 。 
自分 の 札 が 表示 る れ 、 少 し 立つ と また 人 役 が て きだ た と き は 、HI で TAKE、 は | 
衝 待 名 に な か る 。 で DOUBLE を 選び 、 |Z| キ ー を 押す 。 
内 上 まま 得点 が 入り が {0t†{〔 ウ 0〔〈〔 ソ プ 「 Rb :))S()( 
ュ 油 の 表示 ー を 変 TAKE の と き は その NM 人 
右端 の 表示 を 、 1I3|] キ ー を 押し て 変 と さ は る 0NDG 肛 Y 吉雄 っ 焼 』 
える と 、1 一 5 の 数 字 に な る 。 |Z] キ ー DOUBLE の と き は 、 ダ ブル アップ ゲ グ 4 て ソ 1 
を 押す と 、 左 か ら そ の 数 字 だ け 数 えた ー ム に な る 。 そし て 裏 に な っ た カー ド 。 ョ am 呈 識 只 て コ も バ ョ 
が 1 一 6 か 、8 こ 。 ら を 
つ 
ー13 を 予想 する し 人 の 伯 
画 変 数 リス ト 。 55-- 80 キー 入力 の 処理 の だ 。 1 一 6 な て 
回 MA 0 < 85 95 トラ ンプ の 交換 上 の 押 た っ 遊 食 邊 
0 ・ 100-175 役 の 有無 7 衝 ( 
C.D……FOR TO の カウ ンタ ー 。 100-135 ベア ー 寺 NN 1 
ee 6 el 140 アラ ッッ シスコ ー10 な ら [3 け [ZI 1 R 
9 よ つ と し た * ・ 145-175 スト レー ト ・ る し 得 占 が 。 『 還 ぼく が 持っ て いる 
HH や な KEY 入力 ・ 480 当 だ つ だ と き の 処 理 あたる < 侍 点 カ ま 日 6 ボケ コ ン は PB-100 の 家族 - 
N(0)ーN(9)…… マ ー ク ・ 185 一 195 は ずれ or (フラ ッシュ ) 9 す しみ と 9 >] っ WW we - 
X(0)ーX( 9 )…… 数 ・P1 トラ ンプ 表示 1 枚 1 5 me だ と 思う で し ょ う 。 と ころ が 、 こ の ポケ 邊 
遇 ey トラ ンプ の デー ツマ 、 キ ー の デー マ 3 2 トラ ンプ 表示 5 枚 0。 この 繰り 返し コン は 、 遊 コ ン な の で す 。 約 1 年 ほど ま ー 
画 プ ロ プ ラム の 解説 ・P5 当 だ た つ だ とき の 負 理 で 高 得点 が ね ら き え 、 焼 ソ ノバ 3 個 食 べた ら あ た っ て し まい 
P0 ・ 5 1 ベア ー だ つ だ か ゃ ER m まし た 。 あ と 、PC-8801 を 持っ て ます 。 
5 初期 設定 。 10 256 どる が か ける か ゃ 寺 め た 呈 の が 、 0 ほとん ど ゲ ー ム ば っ か り で す が ……。 邊 
10 一 25 ガ け 金 入 力 ・ 30 50 トラ ン ブ が 大 ガ 小 か ゃ に Aa 。 ・ 当 ( 4 
25- 50 トラ ンプ 配り 、 表 示 。 55 75 当 だ つ だ か ゃ こわ いと ころ だ 。 om=ーー ニ ニニ ニー ニー ニー ニー ニー ニー ニー ニーー 
ヶ 2 テ ッッ 〈 ウ ニ ウ ニ 会 話 シリ ー ズ 〉 会 社 に 行く パパ と 見 送り の ママ ど つ ち が す も う 強 い の ゃ 」「 お こぐ り 出 し で ママ の 勝ち ー/ 」 ( 滋 


果 ! あ 賀 県 ・ は な げ ) 六 ベ ン ネ ー ム が 気 に 入 つ た か ら 3 カラ グラム 。 


ジェ 
人 


り 
5 HE Ei PRINT “* 
PB-PUKER 9 まだ 
HZ34G6「89「J 
fALVB 禁 時 時] 
9 
19 PRINT "EREDII": 
HiF 有 E 本 PRIN 
1 ESR11i” H 座 
WER “: UTHS 
15 INPHT * ETP」Bi 
ざ = iNETBs 計 < 昌 
HEN 15 
IFB 省 『 有 EN18 
25 申 HBE F 限 上 
f0 3 
39 NL INEE RH 失 
11) IN 
LR 科 13) せ 1: 
FL= 『 有 EN 生 
3J FDR D- 電 0 E-1: 
FE)- 埋 (Dj5 
iF 5(L た AtD) FH 
EN 3 
し 丘 、 オ 蘭 
5 F K5) 5USUB 


5 財 XT LE PEINTE 
RE 

5 上 = FHR [ER Ti 

66 1 し し ーー15 詩 


旨 = KETiF 上 上 に 
FUH お 計 時 * 
WITD(18t:1)5 財 
ai Li UTUO 5W 

sa Fi4 FRHEN 8 

PRINT LSRL を 2 
ii FRD- 
EEF ED し 


HEN 5 


生計 EE も iE 
= キ +1: UTU 58 

H FL し =) RUSUB # 
ag GU0T0 5 

39 IF 上 =「 有 EN 35 

3 FR 共 HE 上 -1: 
=1( し JIN(D)= 則 ( し 
ti AD) ニ (LT5) 
: 時 TE 

35 505UB 弓 : 上 =H 

1 暗 F 上 RE 日 


HR =ft1 10 4 
IF SE)=XD)5E= 
E+1 


1 的 工 T 0: 虹 EE 
iF EiHEN 14 


H 
1 STHP 1 EE=5 ジ 
PEI 人 NT "ます と qaF 
は *" ュ トニ れ サ 
115 jiF E= 和 本 PRINT 
Fu11 nOUSe": ト = 
則り 


2 FE=3i PRINT「 


1 ご ビ 『 


ょ と たげ ニュ 


[ 2 店 | 
AOPU 証 邊 | 
1 

っ 
の 
< 

まこ 
天 - - 

ピー 

ピコ 


PP31F * 
1 3 介 IF F=ij PEINE “ 
を 1 palf を 
135 BUTH 130 
1 FUR し = 前 日 3 
4 持 三 14K3 ま た 
NEXT し 上 =『 
145 F=Wi FR = HH 
引 上 限 DD 『DU 
邊 FX(E)+1 ニ KK 
!) [HEN 163 
158 IF KK(L)=135 
DD)=1 f 有 FEN 165 
155 EXT DFF+1E 
F Fi1 fHEN 185 


169 FL た ニ 15F=3 

165 EAT LE SFUP: 
IF F=3) 計上 = 
E=J0 拉 。 PRIMT 「E 
TL STIRHIBHT": 
: RUTU 1 

iiB PRIHT "SIR 有 HH 時 1 
隊 IF 上 = 上 =1 明 
』s UTU 1 

iD E=I 5『 此 


1 中 B 社 : OSUB 的 
: BDFO 18 | 
19J sTP ) IF 上 =【 


HEN 135 
PRINT FLHSHP: 
HUTU 189 


30 FRINT 「*Ynu in5 


lr 0T0 18 


LE E 


PRINT LSRL*gi 目 
iDNNCL: 1 HHD 
(し 1251 RETU 

MN 


電 6 


FOR P=W TU 中 
SUB 引 WEATE 
「 RETUNN 


3 PWRINT Fi 計上 =1 
jiH=HFi REiURR 
1H PRINT LSE TEHi 
…D0UBLEE HH 
RE 日 Gi 計 
KET= 1 HE 上 3 

M 


ッ ト ー < ウニ ウー 会 話 シリ ー ズ 〉 「 だ れ か 火事 だ ひら ホー ス を も つて こい 」 「 馬 小屋 へ いつ て ぐる 」 
(高知 果 ・ ハ イド ライ ド ) こ の ご ろ ウ ニ ウ ニ っ て いう より 、 だ じゃ れつ ぽい の が 多い な あ 。 


「 な ぜ だ 」 
こ ご れ は 3 カラ グラム 。 交 


1 ET EE PRINE LE 
3R05 "31 )1"*・ iHE 
FUR し = 電 


間 NET Li 0T0 1 
5 PRINT iPRINTE 


: HHFE RETHRHN 
引 PRTNT : PRINE 
語 D ゴ 
39 FRINI CSRS " 
ほす 6 8 
TH | F 証 『= 
3015 019 は 
4 X| Es 6 上 
3RJ5 Byeei 
FiW = 電 10 5 Os 
F KEY に 1 「 擬 
1 コ 提 
45 ET EL TH SS 
59 [= ENTI FRRN 罰 1) 
j+1』 PREINT L5R1 
: 朋 1DC( HH) 
+14。1)5 肝 1D(E:i 


5 iFE=7 jiHEN 過 

中 IF UK 91 
HHEN 人 

59 IF 7 IF D- 
I 有 EN 人 

導 PRINT You 10s 
ellPi REIURN 

仙 上 キ 5 OTO 


「 ホ ー ス が いる も の 」 


ざ う 


\OO-gg@ 川 


だ けち ゃ や ん が ラミン 
グラ パー ドル と 庄 の で い だ 
けど 、 も ちろ ん りみ マン 
ク 2N ぞ ド し よー ずる に 、 
来る 鳥 (7?) と いう 意味 。 
多分 、 ハ ミン グラ ミード に 
ひっ うか けり だ に ん で て し よう ぬ ね 。 
《 》) で か が こま れ た と 
ころ が スク リー ン 。 十 
が 肉 準 。[11213|* | の キ 
ー で 自 機 を 移動 させ て 
向こう か ら バ サッ パサ 
っ で ツ と や っ て くる 尾島 に 
照準 も あわ せ 、|Z| キ ー 
で ミサ イル を は な つの が だ 。 [2[3] な ら を 
れ ぞ れ 左 右 に 1 コマ ずつ 、 [1l*l な ら 6 2 
ジリ ジリ と 接近 する コマ す の 動 く よ う に な る てい る 。 
怪 島 を や つつ けろ / スコ ア が あがっ て くる と 、 だ ん だ ん 
0 は や て く な っ て くる 
の で が ん は ろう 。 


較 変 数 リス ト * し …… 貞 の 出現 位置 & 左 右 移動 用 ・ 日 …… ハ イス コア 
CS( )…… ". へ ,V : 馬 の キ ャ ラフ マ ・ MS… ツ TOP:* ・2…… 怪 記 の 出現 数 
F$( )……ー. 一 , 三 . 三 * 三 : 複 葉 機 の キヤ 。 OS… び PTS.? 。 〇 C……BEEP 音 の 有無 

ラク フ マ ・ O$… び ひび EMPTY? ・ D…… 怪 馬 & 複 葉 機 の 大 き さ の 段階 
JS$( )……0 一 2: ミ サイ ル , 3 一 8: 旭 発 シ ー ・ RS… ひ SCORE : ? ・P…… 怪 馬 品 複葉 機 の 位置 

シ 。 TS… び BONUS、 / 。F…… 和 動 済み 判定 用 
KS$( . )…… 画 面 バ ターン ・ い U$ ゃ … び STAGE 5 0 : 未 移動 1: 既 移動 
W や ( ) 7 * ぶ ABOCO- ン XY ヤ アフィ @ V や 2 し 08 二 aj 081 ポー ナス ステ ー ジ の 表示 スト ッ プ @ 
GS……" レ ュー ュ コッ 。 三 …… エ ネル ギー 5 時 間 人 
N$…… ハ イス コア ラー の 名 前 ・ Y……: 空 ルー ブ の 回 数 ・K…… ポ ボー ナス ステ ー ジ の 表示 アル ファ < 11 
ト …… 画面 表示 用 ジア ド レス s ら …… メ コ e ベッ ト の 先頭 文字 の アス キー コー ・ 


う ひ と ひね り ウ ニニ つて ほし か つ だ 。 期 待 の 3 カラ ブラム 。 立 


と プ / に 〈 ウ ニ ウ 〔ー 会 話 シ リー ズ 〉 「 ガ ー デ ン に 行こ う よ 」「 家 に みか つて る よ . 


表 全 * 


hb II I 1 I 』 IM 』 』 I I I WM WM Mr 


BY 秋 宛 和 必 

2 行 削 れ ば PC-1250 に も 
は いる 。 親切 な ソフ ト 。 
12 シ リー ズ の 遅 さ に は 定評 の ある と ころ 
だ そう で す が 、 ぼ ぽく は 前 回 の 賞金 で 51 を 
買っ て し まい まし 
た 。 イ ヤー、 新 
品 が 9800 円 だ 
っ た も の て 。 
12 行 と 20 行 
の タイ トル 表 
示 を 削れ ば 、P 
C-1250 に も は い . 
り ま す よ 。 


LIN UI II IN JA IN IN IM M BI 』 BI 』 IM II WM WM HW mW Fn) 


怪 島 セ わ フ レー ム ア ウ ト さ せる と 減点 
衝突 する と 、 減 点 の うえ に エネ ルギー 
も 減少 する 。 エ ネル ギー は ずっ と な く 
が てけ イイ いて 、 ひ に な る と ゲー ム 
ォ ー バ ー な の だ 。 怪 島 が 50 泌 出現 する 
ご と に ボー ナス ステ ー ジ 。 消え た 文字 
を た つか が から 入力 し て 、 向 こう か ら と ん 
で くる 複葉 機 を や 撃ち な と す の だ 。 

と ころ で 、PC-1245 の ユー ザー は 、 
11 行 まで と 、12 行 か ら を REM 文 と 同 
じ フ ァイル 名 に し て 別々 に SAVE し て 、 
C.B. 1 を LOAD し て か ら 、RUN す る こ 


「 才 れ は カー デ テン) 


と 。 自動 的 に CHAIN し ます 。 


層 


WS…… ポ ー ナ スス テー ジ の 表示 用 文字 


変数 


X や …… ボ ポー ナス ステ ー ジ の 正解 記 蛋 用 
プ ログ ブラム の 説明 


9, 10 


難 デ ー タ 読み こみ 
ミサ イル & 画 面 バ ター ン 
ミサ イル & 灯 発 シー ン デ ー タ 
CHAIN 令 で C.B.2 を 自動 
8 的 に ロー ド 


(愛知 県 ・ 晴 田 意 一 ツン ) 立 も 


C.B.2 
20,30 


40 
50 


60 一 150 


60 


70 一 100 


110 


か で すす 


トー も 


トコ ー ュ 
し 見 | し 】 


1 F』 


十 + 


ae 


5 
1 


ロ 
HE 昌 


UP ハ 
し 1 


FOO コ 
し 1 


ポア 


120, 130 
ツイ トル 表示 、 音 の 有無 の 入 
力 

ボー ナス 判定 

怪 馬 の 段 階 (大 き さ ) & 出 現 


。 140 
位置 の 初期 設定 、 ゲ ー ム オー < 


150 


160 一 210 
バー 判定 160 
2 ルッ ーー チン 

画面 表示 、 明 準 ご 馬 が 重 な 
る かど うか 判断 

照準 と 感 の 重ね 合わ せ 表 示 
空 ル ー プ 、 秘 動 六 判 定 


170 


210 
220 


REN に .E 
"2" FLENR : IM C ま 2 


1 素 キ ョ 上 まさ コキ さま (ロコ キ 了 ャ ュ 
に まで ロコ ドキ 1 5 ョ 回 ま (日 1 フロ 
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こ ご この プロ グラ ム は 1245 に 入る よう に 2 
本 に 分 ひけ れ て いる けれ ど 、1251 ン 55 を 使 
用 する 場合 は 、 わ ざわ ざ 2 本 に する 和 め 要 
は あり ませ ん 。C.B.1 の 11 行 目 を 削除 し 
て 、 そ の 決 に C.B. 2 の プロ グラ ム ゐ を 続け 
て 打ち 込ん で ぐだ さい 。MERGE 命 令 で 
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ここ は お ば け の 出る 迷路 。 キ ミ は 、 
を さま よい 歩き つつ 、 部 屋 も あけ 
る マス ター キー、 お ば け を や っ つけ る だ ま に お ば けが 出 て 〈《 る 。 こ いつ と 
お ふ だ を ひろ い 、 ト イレ の カギ を ひろ 会 っ た ら フ ァ イ ト モー ド 。 [3] で 水平 
っ て 、 み ご と オシ ッ コ し て くる の だ 。 座標 、 [2I5I で 垂直 座標 を な ば け に あわ 
迷路 を 進 人 電導 IC セーA2M た だ し 。 や ー ム 
2 が 前 進 。 2| が ドア を あけ る 。 [G] を 押 は お ふ だ を 持つ て いな いと 使え な いよ 。 
ngi の そう そう 。 お ば け に 出会う と ぼ 
に 飛ば る れ ち ゃ う の で 注意 / 
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4 まず 、 ド ア を あけ て みよ うか が な 。 


ム ち つ 、 マ スタ ー キ ー を 持つ て な いん だ 。 


1iCLENR :Z$= 


り 

2iCLS 』 CURSOR 5: 
PAUSE "トイ ル ファ イト 1!" 
LURSOR 24: PaUSE "HI 
="5 0195J$: =9:K=1 
0SUB 88 

3:0= RND 8+1:P= RNIU 8+ 
1: IF PEEK 〈&6FT9+0* 
19+P)=9 GOTO 3 

4ib0SUB 89:0= RNH 8+1: 
H= RND 8+1: IF PEEK 
(&6F79+H*19+6)= 9 
50TO 4 

JRHNDOUM :X= RND 8kY= 
RND 8:M= RNU 4-1: 
CLS : CURSOR 53: 
PRUSE "SCORE="?3S*18 

6:H=XsB=Yi 6G0SUB 68: 
RRNDOM : [IF Z$=** 
60SUB 25: GOTO 14 

rsCLS : GOSUB 25: 
50SUB 199+L*5s 
0SUB 11g+N*5: 
50SUB 129+MiP=Ni IF 
(X=G)*(Y=H) LET 和 †=1: 
=9: =9 

8i IF (X=0U)〉*(Y=P) LET U 
=1: =9:P= 

39: IF MM=9 50TO 14 


4 キヤ セツ. ング オ / (7 だ 。 も れ ち ゃ つよ て 。 


4 ホン 、 ま に あつ だ 。 ト イレ ファ ライ ト 大 勝利 


ぢ 6 ポリ ェ ッ トー 〈 み ちゃ ん トマ ト に つい て ) 前 号 に 載 つ だ 兵庫 県 の 岡部 孝 規 フ ン の 作品 は ベー 〇 ガ に も 載 つ て まし た ネ !」 ご これ は ま ざ い で 
@- 住 欠 o 不 友よ 。 マイ ナス 5 カラ ブラ ム だ |! で も 、 ま だ お て まみ ちよ ー ら い 。 も っ つと すご ーー いや つ を ネ ! 


19: =X+CM=2)-(M=g):B=Y+ 
CM=3)-(M=1): E0SUB 6 
9 

11:60SUB 158+L*5: 
G0SUB 169+N*S: 
G0SUB 179+M 

12:IF (人 =0)*(B=P)+(=G) 
*(B=H)>9 GCURSOR (35 
) 28): GPRINT "969292 
9592 

14:Z$= INKEY$ : IF Z$=* 
6* 60T0 2 

15:M=M+(Z$=*3*)-(2$=*1・ 
): =M+(M=-1)*4-(M〉3) 
*4 

16:IF 2$=*2" LET X=X+C( 
M=2)-CM=9) )*P:Y=Y+(( 
M=3)-(M=1) )*P 

17:IF Z$=*Z" RND NM=8 
LET F=F+.5: 60SUB 39 

18:IF RND 17=5 CLS : 
BEEP 9: CURSOR 54: 
PRINT *4n・751": 
GOT0 58 


19:iIF F〉>=59 CLS 
LURSUR 6: PRINT "5RaH 
E OUVER"i CURSOR 63: 
PRINT "Asp?i 50TO 21 

29iF=F+。25: G0TO 6 

21:MRIT S9: GCURSOR (65 
316): DPRINT "FE8988 
89462712264898989FE 
": LINE (299)-(129 
2): 6CURSOR (75, 24): 
bPRINT *182618 

Z2:IF Q〈S CURSOR 77:Q=S 
: INPUT *TOP! name"i 
J$ 

Z3:CLS : CURSOR 32: 
INPUT "Retrg2712$: 
IF Z$ く >YYY END 

24:F=9iK=11S=9: G0TO 2 

25:MRIT 9: LINE (858)- 
(F+859)5B: GCURSOR 
(95516)』 GPRINT *FBR 
8R888"i GCURSOR (118 
516)i GPRINT 了 : 
GCURSOR (132 16) 

26:bFRINT "F828289B*: 
50SUB 49+M: IF K>=1 
GCURSOR (99 33): 
FOR Ii=1 TO K: 
5PRINT "3E273EY5: 
NEXT I 

2Z7iFOR I=9 TO 2: PSET 〈 
119+I*9518)』 NEXT 1{: 
5CURSOR (99524): IF 
「=1 GPRINT "92FDA299 
F9294929F9" 

28:IF U=1 GPRINT "82FDR 
<Z9919F919" ぅ 

29:LINE (11928)-(128-( 
RBS (X-H( 了 +T*8))+ 
RBS (Y-R(8+T*8))) 。 25 
25BFi RETURN 

39iCLS : IF T=9 CURSOR 
25: PAUSE "You have 
no keg! Yi RETURN 


31:G0SUB 25: IF X=8 
RND Y=8 AND M*U=2 
0SUB 149:F=9: CLS 
CURSOR 了 751: PUSE *+ 
9。。。 5 BEEP 3:K=1 本 = 
9iU=9: 50TO 2 

33iLINE (193)-(69 28) 
5Bi LINE (6929)-〈(19 
513)526214BFi LINE 
(1913)-(138) 

34iLINE (578)-(69 13): 
LINE (138)-(57 了 8) 3 

IF RNH 5=1 BEEP 8: 

K=K+ 1 

36: RETURN 

49:GPRINT "94821F9294": 
RETURN 

41:CPRINT "9898281C98"*: 
RETURN 

42:GPRINT "2949F84929": 
RETURN 

43:GPRINT "981C289898"* 
RETURN 

99: = RNU 8:B= RND 3:C= 
1 : =1 

う 91 内 =( RNHD 3-2)*:M=M*((R 
+W う >1)*((TM) く 9) = 
+MiB= RNH 2 

92:Z$= INKEY$ :C=C+(Z$= 
* う ")-(Z$="1")-(C>18) 
+(C く 9): =]+(Z$="2*)- 
(Z$=*5")-(D>4)+(1 く 9) 

33sCLS : LINE (854)-〈8 
J+†K*258)5B: PSET (C* 
8531): PSET (81D*8) 
: bCURSOR (*8-8B*8 
) 

945PRINT "F88482329191 
31918192FCYs 
CURSOR (A*8-8B*8+8 
2』 5PRINT *939438414 
14141414949495F6949* 

29 IF 2Z$="2" LINE (838 
)-(C*85J*8): LINE (8 
9 39)-(C*8。J*8):K=K- 
・25: IF a=C AN 3=D 
BEEP 1:S=S+19: 50TO 
6 

う 96 IF K<=9g LET F=F+3 ス : 
50TO 5 

97s50TO 51 

69:RESTORE 99: FOR I=g 
TO MI _ READ LiMNs 
NEXT Ii FOR {=g TO 2 
iR(12+[)= PEEK ((&6F 
B+H*19+R)+R(12+1) ): 
NEXT Ii RETURN 

89iH=&6F79:i FOR I=g TO 
929』 POKE (Ra+1I)5 9: 
NEXT 1: FOR 【I=1 TO 8 
: POKE (R+I*19+1)51。 
1515151515151: NEXT 
1 

81iFOR I=1 TO 25: POKE 
(HH+( RNU 6+1)*1 ロ 9+ 
RND 8),9: NEXT Is 
RETURN 

99:DRTHR 195-15-19 

31:HRTR -15-19 1 

92: RTR -19,119 

393:DRTR 119-1 


98:IF F>=59 CLS : 
CURSOR 6: PRINT "GAM 
E OVER": CURSOR 63: 
PRINT * ヽ ヽ ぁ Yi 50TO 21 

199:LINE (99)-(29,5): 
LINE (29,25)-(9, 39) 

191:LINE (528)-〈(5 12): 
LINE (5 12)-(12 13): 
LINE (12,13)-(12 26) 
5 PSET (1929): 
RETURN 

195:LINE (99)-(9, 39): 
LINE (9,5)-(29 25) 2 
6214BF: RETURN 

119:LINE (89,9)-(69, 5): 
LINE (69,25)-(89 39) 

111:LINE (75 28)-( イ 5 12) 
5: LINE (75, 12)- バ (68 1 
3): LINE (68 13)-(68 
526): PSET (79,29): 
RETURN 

115:LINE (89,9)-(89, 39): 
LINE (69,5)-〈89, 25), 
26214,BF: RETURN 

129:LINE (29,5)-〈69, 25), 
26214BF: LINE (35, 1 
1)-(4525)5R5BF: 
PSET (43,17) 

121:RETURN 

149:X=49:Y=31: FOR 1=9 
TO 369 STEP 12:A=9* 
SIN 【+49:B=13* COS { 
+18: LINE (XY)-〈(RB 

。 3 

141:X=AiY=B: NEXT 1: 
LINE (3229)-(48, 29) 
: LINE (35 29)-(44, 1 
5)&7557 BF: 9=S+ 
INT (59-F)*5+U+K*3 

142:A=F/Z5: FOR 1I=1 TO 4: 
F=F-i LINE (85,9)-( 
85+F8)B: LINE 〈85+ 
F 59)-(85+F+HA5 8)5 RB: 
BEEP 1: NEXT 【I: 
RETURN 

159:LINE (29,5)-(35, 19): 
LINE (35 19)-(35 21 ) 
: LINE (35,21)-(29, 2 
5) 


151:LINE (25)24)-(25 13) 
5 LINE (25 13) -(39 1 
4): LINE (39 14)-(39 
5 2Z2): PSET (2918): 
RETURN 

155:LINE (295)-(29 25): 
LINE (35』 19)-(29 21 ) 
ぅ BFi RETURN 

169:LINE (69,5)-(45 19): 
LINE (45』19)-(4521) 
5 LINE (4521)-(69 2 
2 

161:LINE (5524)-(55 13) 
: LINE (55 13)-(59 1 
4): LINE (59 14)-〈(58 
sZZ)』 PSET (51。18)* 
RETURN 

165:LINE (695)-(69 25): 
LINE (69,19)-(45 21 ) 
5BFi RETURN 

179iLINE (3519)-〈(45 21) 
5BFi LINE (38 14)-(4 
2529)5R5BFi PSET (41 
517)』 RETURN 

171:RETURN 
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y 軍 4 2 プ メ 2 ブ Y N 
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Nb の 、 TS SX3 H 7 ヘ アーン ぷー ここ 
に メー イー ナド 1 ンプ < 
が 2 の い トメ 0 の 
人 還 urars と ム 1 w oe 

> っ か 2 で 年 ? 2 ーー アー で 
Ei2 5 そま ) < ・ ー* / し 
加 に っ 時 も ま 6 み \ 4 し 3 る 


まず 、 お 本 。 で 先生 の 最新 作 
わび さ ざ び の 逆 租 
FOR PC-880 7 シリ ー ズ 


(M88_BAS/C). っ リス ト 1 


この 特集 の きっ か け と な っ た 『SHIF ・ 


T SHIFT SHIFT ! 」 の 作者 ・ で ぶ 大 先 
生 の 最新 作 。 こ ん ど は ちょ っ と ば か り 
長く て 約 半 画面 の プロ グラ ム だ 。 
その か わり マシ ン 語 用 の チェ ッ ク サ 
ム プ ログ ラム を 内 蔵 し て いる の で 、 と 
ぶ 必 配 は な い 。 で も 、 マ シン 語 の は い 


っ た プロ グラ ム を 打ち こん だ と き の 作 ・ 


法 と し て 最初 に セー ブ し て お く こ と は 
店 れず に 。 


RUN さ せる と 、 も し DATA 部 分 を 打 ・ 


ち ま ち が えて いた ら DATA ERROR" 
と 表示 され る の で 、 も うい ち ど DATA 
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に 

N 

の て 9 ロ ) う = テツ? 1 
フフ フッ ウ 。。。 


サビ 
サビ 
サビ 
サビ ーッ 
コ 978 , 1 ら 68 

ウ ビ ~ サビ ~ 


た だ O 〇 TI 人 TITTT 
と し 生 し し 


還 つら 0 ココ コロ コロ 〇 フカ 


画 遊 び 方 (?) 
も 9 うず 0200G の らら 
ろう が 、 こ の プロ グラ ム は 一 定 間隔 で : 


* わ びさ ぴっ” と いう 文字 を 強制 的 に ・ 


画面 に 表示 させ る も の な の だ 。 は っ き 
り い っ つて 。 た だ ぞ それだけ 。 
RUN さ せる と 、 

Number (5 一 60) = 

と どき MV で くる 。 ここ で "わび ぴ びき さび ぴ びっ) 
と いう 文字 の 出現 頻度 を 決め る の だ 。 


5 は 約 5 秒間 隔 、 60 は 約 60 秒 間隔 くら ・ 
い に 設定 し て ある 。 自分 の キー 入力 ス : 
ピー ド に 応じ て 適当 に 数 字 を 決め れ ば ・ 


ら 1 己 っ = ニ 己 て ロロ 己 


ヽ Kg まま 45 っ St て いこ ん ノ (0 間 あ 
も v つ の ) ま * 2 3OK を No 1 リー が 用 
2 ガオ 2 oo 2 こく < RO 』 に (りつ た 
『 1 : | 地 M で FES まこ と 
「SHIFT SHIFT SHIFT 1 』 が 異様 に 
こう 【 H 2 フィ ーー で で リス 人 K【 ト ー 
プロ グン クム や 7 多 プ ログ ラノ / ム が ズン ダバ 
し ブ “ 2 ーー ふ ヽ 2 容 アメ | の 3 / ン い へ の N 2 シン 2 ヽ 
ee まつ 0 キ ンー デ " た 2 テラ 5 し タテ 8 2 ンー 1 
5 沈 も だ ルル て ン グッ グッ と ん 笑 つて は ほ はかり 
に チン 4y テト ー に る だ 、 衣 ょ 4 -4ー H 計ら ラー アー 人 
1 ^ け [ 二 ア キ Sd あ 。 を つ も まう 本 2 1 人 4 ノ 2 臣 、 レッ 
ヽ プ ぞ ー に \ ノ デ 
2 の 
っ - デ ・ で へ ? に H う っ ノン 有 朋 コッ ー イ テー 
は ュー イィ で の Me < で 。 gc 0 SS 1 ルー る に さ ー 
らら を 、 あ の わ ひ びさ ひび の 世 夫 へ ご 指 待 し よう 。 機種 
ud KN PP か ェ グ ント か 、 こ の で = の AS Qe 
TS 『 ズン * be Pa の ・ ブ トッ < さこ に に い eS /、 っ の ジ 
ミ は わび ひさ ひび ひ の 深 一 い 世 界 が わか る よう に な る ! 
5 2 cw 2 Gr て 1 2 5 ! 計 み 6 8 
YS SE / 7 RS た わく た し こも ーX HB 
の の 、 こい りん トド ト の 0 か この めのう られ た まし きま は 1 条 の 
アプ すず ンー H 
/ アメ り に 


- RUN し て マイム を 決め る と メッ セー ジ 。 そ し て …… わ びさ びっ つ 、 わ びさ びっ つ / 


り 
『POKE  -?Z978 , 168」 


ua ラニ つつ ロ 。。。。。「 ロ 与 ロゴ 


いい 。 最初 は 30 く らい が 適当 だ ろう 。 
だ が 、 い っ た ん Number を セッ ト し 
て 、 リ ター ン キ ー を た た いて し まえ ば 、 
きれ は ほ 央 底 が ごと に な る 。 年 こ が な が に 
か し よう と し て 、 キ ー を た た だ いて いる 
と 、 突 然 な ん の まえ ぶれ も な くわ び 
さび ぴっ?” と 文字 が で で くる の だ 。NEW 
し て も 、 マ シン 語 は 消え な いか ら 、~ わ 
びさ び ぴ びっ" の 逆襲 は 止ま ら な い 。 
そこ で これ を 人魚 座 し な く て は な ら な い 。 
その た め の ス テー トメ ント が 、 
POKE-7978, 168 
だ 。 こ の 命令 を 打ち こみ さえ すれ ば 、 
すべ て は も と の と お り に な る 。 


。 了 SPACE SPACE SPACE: 津留 三 大 先生 お 元気 で すか や どう も ゆみ に は この ゲー ム 上 に で きま せん 。 ま わり 
の 人 達 は 、 や れ ど ん こく さい だ の 、 へ だ こそ だ の と 言っ て きま す が 事 実 な の で どー する こと も で きま せん 。 慰め て ぐだ さい 。 


19 CLEAR ,&HDFFF: DEF USR=&HE999: FOR 1I=9 TO 399: READ D$: D=VAL("&H"+D$ も ): POKE 
&HE999+1。D: S=(S+D) MOD 19999: NEXT: KEY 2,"POKE -7978.": KEY 3,"168"+CHR$(13) 
29 ぃ READ D: IF S<>D THEN PRINT "DATA ERROR" :STOP 

39 INPUT "Number(5 “ 69)="iN: Ns=Nx39: POKE &HE996.N MOD 256: POKE 8&HE997J.N \ 256 
・ POKE 8&HE9D7,N MOD 256: POKE &HE9D8JN \ 256: A$=USR("9"): END 

49 DATA F5.21.03.E1.CD,59.55.91.109.27.0B,79,.B0,20.FB,21.19.E9,F3.22.9A,E8,FB,F1 , 
し 9.DS CS 3A。C9、E6,FS。3E、91.D3.E4、1E、/F、32.C3.B6 .3A,A8 .E6.D3.51 3A,89,.EE ,FE, 29.3A 
8/,。EF 、3D,39.91 .87.D3,59.3A,86,EF , 3D,D3,59.FB,CD,3F,3F,3A,CD,E6,B7 ,29,.3C,CD, 42 
S59 DATA 32.39,24.3A.CE,E6,B7 .28.31.3A,9C,F9,CD,13.49,7E,E6.91.28.99.CD,12.59,AF , 
32.CE,E6.18.1D,CD,EA,34.38.18.CD,F9.39.18,.F6.20,9E,21 .CF,E6 , 35 20 、9B,、3A,FE,EF, B7 
> 286,95.36,94.CD,F9.39.F3,ED, 4B,D7,E9,9B,ED,43.D7,E9 78、B1,29.21.91.96.99,ED, 43 
69 DATA D7,E9,3A,C1.E6,EE,29.D3,.49.96.99,19,FE,EE,29,D3,49,E5,21 .D9,E9 , CD,59 ,S55, 
CD,99.42.E1.3AJD6.E9.FE,A8.29、9F,E5.21.E5.E9、CD,59.55.F3,21.89.39.22.9A。E8,E1 FI 
5D3,E4.32.C3。E6,C1.D1 ,FB,C9.99.96.99.15,DC,CB,DE,BB,CB,DE,AF,29,12.9A,99,99.DC 
79 DATA CB,DE,BB,CB,DE、29.77.61 ,73.20.67.6F,6E,65.2E,2E,2E,2E,2E,54.68.65,29.,65。 
6E,64.9A,99.99,CC,AF,CC,AF,CC,AF,2E,2E,2E,9A,99.79,.6C,65,.61.73.65.29。74.79,70,65 


SCRERN 3.2.2!C 


(256 ,192 ) , 4 


39 U=A:S=STRIG(9):A=A-(S く >G)x2:G 


:H=9 
29 CLS:A=9:P=9:Z=90:LINE(256,9 ) - 


> 29 A2.59.4F,4B,45.29,2D,37 ,39,37,38,2C,31 36,38.A3,9A,99,6142 


な の だ (と 考え られ る 
けど 、 よ うす る に 冗談 
ね )。 

ちな み に 、Number を 


=1 -5:P=P-(A=U)\19:Z=Z+(A=U ) \2 短く 設定 し すぎ て パニ 
49 IFA く >UTHENZ=99 
59 LINE(A,Z)-(A,192) , 4 


69 IPA=256THEN89 
79 GOTO 39 
89 IFP>HTHENH=P 


99 LOCATE3,9:PRINT "SCORE"Pi ELOCA 
TE1.11:PRINT"HI SCORE"Hi 


ッ グ に な っ だ ら 、F ド 1 
F 2 の キー を 続け て た 
た け ば 、 解 際 メ ッ セ ー 
ジ が 目 動 的 に 打ち こま 
れ 、 わ びさ び は 行っ て 
し まう の で こ 安 心 め さ 


190 A$=INKEY$: IFA$= " "THEN199 れ 。 


119 IFA$=CHR$(13)THEN29 
120 GOTO199 


や っ て みれ ば 、 よー くわ か る は ず だ 


が 、 POKE (と 打ち こん で いく を き に 
も 、 突 如 、 わ びさ びっ ” と ジャ マ し て 
くる の だ 。 
POKE-79 わ びさ びっ 

「 く そっ 、 も う 一 度 」 
POKE-7978, 16 わ びさ びっ 

RY れる た だ い 」 
POKE-7978, 168 「 リ ター ン 」 


と め TG で だ く 入 力 で きる と 、0K ど 上 箇 て 、: 


~ わ びさ び weas gone…The end' ( わ 
びさ び 終 了 ) と メッ セー ジ を 表示 し て 
終わ り 。 

はら ほう つ は 、 ほ ん と に な ん だ か よく 
わか り ま せん ね 。 

これ 信 、 キ ミュ の キー 大 力 の スピー ド 
を 訓練 する た め の も の と し て も 使え る 
し 、 友達 の パソ コン に こっ そり 打ち こ 
ん で イタ スズ スラ する こと も で きち ゃ うと 
いう 、 マ ジ メ ダ & イ タス ラ の プロ グラ ム 


〈OPEN YOUR_ EYES〉 な ん な の 、 こ の は や さ は !? 
こん な に は や けり ゃ で きま し ぇ ーー ん 。 目 が 慣れ れ ば 大 丈夫 だ ネ 。 楽勝 だ ネ ! 


わび さび ジグ 


名 作 の パロ ディ 

5 ら FACE SFACE 
ら FACE 

FOR PC-6007/6607 


ラル トー スズ 
(NM6O BASIC 7GK PAGE2) リス トク 


お じ さ ん 大 臣 こと 重松 津留 三 氏 が 作 : 


っ て くれ た この プロ グラ ム 、 遊び 方 は 
ほとん ど 『SHIFT SHIFT SHIFT」 と 同 
じ 。 つ まり 、 棒 グラ フ の 伸び を タイ ミ 
ング よく キー を た た いて 遅らせ る ゲー 
ム だ 。 た だ 、SHIFT キ ー を SPACE キ ー 
に お きか えた だ け 。 ま た 、 お くら せる 
た め に グラ フ の 幅 を 大 きく する よう に 


の 
SH FU 3 ー ご o 
35 


ょ や 
れ は と 1 


な っ て いる 。 (写真 上 参照 )。 
あの 名 作 の 説明 を 読ん で 88 ユ ー ザ ー 
が うら や まし か っ た 60&66 ユ ー ザ ー の 
キミ に は あり が た いわ びさ び で すね 。 
だ だ 、 1 行 フ ログラム で な いと ころ 
が お し か が ゃ た 。 ! 


X 1 版 の わび さび ぴっ ! 
パン プ の 
あっ ぱら ば 一 
FOR X/ シ リー ズ 
(Hu-BASIC) 


= ルナ スズ ド ラコ 


リス ト は 1 行 。 遊び 方 は か ん た ん で 
奥 が 深い (か な ? )。 わ びさ び の 条件 を 
すべ て 備え て いる の が これ 。 

今回 、 パ ンプ は いそ が し くっ て 長い 


下 に パ ツ と で だ 4 文字 を うち こむ こと いう 簡単 な ゲー ム な の に 、 どの 


966 66 66 己 


プロ グラ ム を 作っ て いる ヒマ が な か っ 
た と いう の が お も な 理由 な ん だ けど 、、 

「 パ ンプ ー! プロ グラ ム 、 ち ょ ー だ 
い :『」 ど お ね だ り し て みた ら 、 パ カバ パ 
カツ ウツ とこ いつ を 作っ て くれ た で れ で 
も 、 構 想 だ け は 、 1 年 か か っ た の だ と 
いう (ホン ト か ね )。 

RUN さ せる と 、 画面 に 大 きく 表示 さ 
れ た 円 が 、 パ パパ パ と 色 を 変え て いく 
の だ けど 、 透明 ( 黒 ) に な る 瞬間 が あ 
る の だ 。 そ の タイ ミン グ を 悪魔 の よう 
に は か りつ つ 、 ピ ッ と スペ ベー スキ ー を 
押す ! ぴっ た り 透 明 の と ころ で 止ま 
っ た ら GOOD"、 は ずれ た ら ~BAD" 。 
うー ん 、、 こ の タイ ミシン シンク グ が きわ どい ん 
だ よね ね 。 

0.1 秒 レベ ル の 感覚 を 競う ゲー ム な ん 
だ けど 、 ず っ と “GOOD” を 出し つづ 
け て いる と き の パ ソコ ン と 一 体 に な っ 


た よう な 感じ は 、 ち ょ っ と あじ わ う と 、: 


し ば らく の あい だ や みつ き に な る ( 少 
な く と も 編集 部 の 一 部 の 変態 た らち は そ 
の だ つた りか 


BRD! 


4 うま くべ タ イミ ング が あわ な いと ……。 


| frOSH(T こ め ぬ 「YA 


1 COLOR9:R=R+1:PRINT" Input 。S 


・ 眼 を 見 開い て 、 よ く 見 よう ! 


: OPEN YOUR 
: ヒ YE8 


FOR PC-8007mkTII SR 


(M8O BAS/C) っ リス トノ 4 
(た だ し ^:CMDCLS1” を 除け ば N-BASIC で も 可 ) 


お っ と っ と 、 こ れ も 1 行 ブ ログ ラム 
な の だ 。 ど う も 、 フ ァ ン クシ ョ ン キ ー 


・ 表示 を 利用 する あたり 、 で ぶ 大 先生 と 


同じ タイ プ の プロ グラ マ と 見 た 。 ま 、 
そん な と ころ で 、 私 た ち は 彼 を 勝手 に 
CE 生 : 導 よ こと に し た 。 


さて 、 て ヾ 先生 (自称 ・ 風 の 谷 の プ : の こと に 気づい た の だ 。 
ログ ラマ ) の この 作品 は 、 や は り 、 一 * 


・ 瞬 に か ける ゲー ム で ある 。 


RUN す る と 、 フ ァ ン クシ ョ ン キ ー の 


: どれ か に 4 文字 が 一 朋 だ け 表 示さ れる 。 : 
: その 4 文字 を は っ きり 頭 に 焼き つけ て 、: 
: 正しく 入力 すれ ば 、 パ チ パ チ と 拍手 も : 
・ の の 成功 な の だ 。 
: まち が っ て も 、 何 度 で も 入力 し な お : 
: すこ と が で きる 。 正しい 入力 が で きた : 
・ ら 、 何 度目 で あっ た か を 表示 し て ゲー ・ 
: 以 オ ニー バー。 も と も と 、 これ は キー 入 
・ 力 の 練習 用 に 作っ た の だ そう だ 。 こ れ : 


も 、 シ ンプ ブル な だ け に や みつ き に な っ 


で し まう よっ 。 


。0 さ ( ル 引 弟 一 | は 
慎 紋 Rf は 「J( て マヤ 


WAIT4.8.255:CMDCLS1:N=RND( 1)%5+1:FORI 
HR$(RND( 1 )x199+48) :NEXT :B も =A$ も (1 )+A$(2)+A$(3)+A$(4):KEYN,B$:BEEP : KEYN,“" 


: CAPS ラ ン ブ が チカ ッ チ カッ ! 
: AP ら 
: FOR ん SX(iek) 


っ リス トド ト ら 


どう も 、 パ ソコ ン の ハー ド を 利用 す 
る と いう の が 、 は や りつ つ あ る よう だ 。 
『CAPS」 は 、 キ ー ボ ー ド の 左下 あ た 
り に つい て いる CAPS キ ー の ラン プ が 


・ つい た り 、 消 えた りす る ゲー ム だ 。 た だ 


し 、PV-7 に は 残念 な が ら こ の ラン プ が 


・ つい て いな い の で 、 い くら メモ リ を 増 
・ 設 し て も この 機種 の ユー ザー は 遊べ な 


い 。 い や 、 編 集 部 で も 今回 は じ め て こ 


RUN す る と 、 プ ・ プ ・ プ ブー ン ” と い 
う 音 が 鳴っ て 、 同 時 に CAPS ラ ンプ が 
920 たり 、 : 滑 え た ひし は 選 め る 。 ラシン 
プ が つい て いる と き に は スペ ー ス キー 
を 押し 、 消 えて いる と き に は は な す 。 
うま く シ ンク 提 し で いる あい だ は 、 こ 
の 繰り 返し 。 ず れる と その 時 点 で ゲー 
ム オ ー バ ー。 タ イミ ング を は か る 反射 
神経 が 勝負 の 決め て だ 。 

この ゲー ム は ゲー ム 中 、 画 面 を 見 な 
い ! 史上 、 ま れ に 見 る 不思議 な ゲー 


ム で ある 。 
し か し 、 そ れ に し て も 画面 写真 が 必 
要 な い ゲ ー ム な ん て は じ め て だ 。 


1TO04:A$( 1 )=C 
"・ INPU 


"カナ ラス ~ 4 モン "In "iC も ED=INSTR( 1.B も ,C も ):COLOR2 ETIFD=1THENPRINT "アタ リ 1 "5 Ri "カイ "ELSEPRINT "ハハ 


ズー レー "5B も :GOTO1 


重 、 っ そ を 一 6) スキ ー 大 好き 少女 の ゆみ は 、 ご の 音 が 大 好き 。 雪 を 滑 べ る 音 つ て 、 た まん な い の よ ね エエ 。 お 願い だ か ら 画 面 か 
ら は ずれ だ と ころ に 行か な いで ね 。 


19 DEFUSR=&HE999:FORI=9TO6:READA も や :POKEI+ 
&HE999.VAL("&H"+A$ も ) ENEXTEDATA3A,19,.E9 .CD 


32。91.C9:POKE&HE919,1:A=USR(9):PLAY"04L 
8CRCRCRO5C" ETIME=9 

15 IFPLAY(9)=-1 THEN15 

29 A=RND(1)x2:IFA く 1THENL=1ELSEL=9:TT=276 
39 POKE&HE919.L:A=USR(9):FORI=9TOT1:NEXT 
・BEEP:IFSTRIG(9)=9THENI ド FL=9THEN59 ELSEPL 
AY"O08L64C" EGOTO29 

49 IF L=9 THENPLAY"08L64C" EGOTO29 

59 PLAYUICO PRINI score "TIME 


ー さ 各 走 つ QAqI は 人 


中 や HHJO き 如 H WS 剛 本 厨 燥 4 


。 と 9 身 


びき び ぴ び し て いる 。 し か も 、 サ ウン ド 信 
き な ん だ も ん ね 。 

操作 は スペ ー ス キー だ け 。 押し て い 
る と き は 左 に すべ り 、 は な す と 右 に す 
の で も CEC グラ ウッ ショ し だ ら 、 もち 
ゃ ん と 、 何 メー トル 走っ た か 、 表 示し 
て くれ る の だ 。MSX を 持っ て いる 友達 の 


の びさ ざさ び ノ 
ザ ザ ー ツ と スキ ー で す 
か っ そ 一 刀 
FOR ASX(7e) 


っ リス ト フ 


の びさ びら 6 


も う 、 ひ だ すら ハイ バー ! 


看板 に な っ た も の ば か り だ が 、 ご く ふ 
つう の ゲーム で も 。 それ が 1 行 に お き 
まっ て いれ ば 、 わ ぴき さび し て いる と 
見 な し て この 特集 に 組み 入れ た の だ 。 

『 か っ そ 一 6」』 は 単に スキ ー ゲ ー ム な 


は え p 

に 四 家 に 行っ て 、 ふ と 話題 が と ざれ た と き 

の な ん か 、 か ね て か ら 暗 記し て お いた こ 
ご 消 いま ま て 紹介 し た ゲー ム は 、 冗談 が の プログ ラム を パチ パチ と 入力 し て と 


ラ ケ を 防ぐ の に 役立つ で あろ う ( ? )。 


es ご に fj は 人 人 
7 ご 沿 つ は 中 


の だ が 、}1 行 に な っ て いる と ころ が わ ね 


り ン (ニー 寺 寺 マ 


キー ボー ド パ ニ ッ ク 
FOR PC-800 7 シリ ー ズ / 
PC-880 7 シリ ー ズ 


(M-BAS7C) 


リラ スズ R 6 


INPUT "1= カ タテ 2= リ ヨウ テ ーー"51:TF 1=2 THEN 99 
29 CONSOLE 9,25.9,1:A=9:B=9 

39 PRINT "スタ ー ト --1" EEFOR 1=9 TO 99 

49 A$=INKEY$: IF A$="" THEN 49 

59 IF A$="." THEN A=A+1:GOTO 89 

69 IF A$="Z" THEN B=B+1:GOTO 89 

79 GOTO 49 

69 NEXT I:GOTO 156 

99 PRINT "スタ - ト --! "FOR 1=9 TO 99 

199 A$=INKEY$: IF A$="" THEN 199 

119 IF A$="." OR A$="9" THEN A=A+1:GOTO 149 
120 IF A$="Z" OR A$="C" THEN B=B+1:GOTO 149 


これ こそ 、 わ びさ び 界 の ハイ パー オ 
リン ピッ ク と 名 付け られ る べき ゲー ム 
だ ろう 。 画面 に 向かっ て 左 の プレ イヤ 
ー は 、Z と C、 右 の プレ イヤ ー は 、 0 
と 、 の) キー を 罰 チ チャ カチ ャ や っ て 、 ニ 


人 の 合計 が 100 を 超え る と ゲー ム エ ン 139 GOTO 199 

- be 149 NEXT 

o ー 本 4 2 の 
Na 159 COLOR 6:PRINT "a 9>=Ai" の "ECOLOR 1:PRINT "b サン FiBi の イイ 
多い ほう が 勝ち と いう ゲー ム だ 。 単純 169 COLOR 7:IF A>B THEN PRINT "a サ 9> ノ チーーー-!!" EGOTO 199 


COLOR 7:IF A<B THEN PRINT "b サ > ン ノ ーー-- 11『" 


な だ け に 到達 と や っ て いる と 、 つい つ :GOTO 198 


い 夢 中 に な っ て し まい そう 。 


1 WIDTH31:SOUND6 , 5 : SOUND7 , 55 : SOUND8 , 1 6 : S 
OUND12.19:LOCATE,23:COLOR1 15,15:W=6489: 
FORI=9TO09999:VPOKEW , 34:PRINT"P":IFVPEEK( 
W)=32THENP=S:S=STRIG(9):W=W+Sx2+1 : VPOKEW 


29:LOCATERND( -TIME ) x31 , 23: IFP く >STHENSOU 
ND13,13:NEXTELSENEXTELSEPRINTSTR$ も ( 1 ) "m^ 
よ ":PLAY" 6 


の びさ び ど 一 


ー 挙 に 3 本 ! 1 行 プ ログ ラム パッ ク 
競馬 -mini 
数 あて ゲー ム 


放物線 アタ ッ ク 
FOR PFA-Z/NEWZ/ 


ノノ っ リス ト 8-10 : 


ロン プレース だ つて 楽し め る 
① 競 馬 -mini 
3 本 と も 同じ 作者 の 作品 。 


1 本 目 は 、 競馬 。\ ヨ ソウ "と 表示 さ 
れ た ら 、1 一 5 まで の どれ か を 入力 し 


い に ス ター ト ! 
ある か !『? 

この リス ト で は 40 字 モモ 一 ドド だ けど 、 
80 字 モー ド に すれ ば ロン グレ ー ス か 楽 
し め る ぞ 。 リ スト 中 の SPC (35) を S 
PC (75) に 変更 し 、 さ ら に R ニ ー (A 
( Z ) 三 37) を R ニ ー (A(Z)=77) に 
変更 し て みて 。 


キミ に は 予知 能力 が 


20 が 3 


4 イス に 見 える けど ら 頭 の 馬 で す 。 


パソ コン の 上 思考 を 「 読 む 」 


パソ コン の 考え る 1 一 100 の 数 字 を 当 ・ 
て る ゲー ム 。 キ ミ の 「 読 み 」 を 入力 す 


小さ いか を 教え て くれ る の で 、 カ ン の 
悪い 和 人 だ っ て いつ か は 当たる ね 。 当 た 
り に な っ た ら 、 何 回 で 当たっ た か を 教 
えて くれ る の で 、 み ん な て 超 能 力 ご っ 
こ で きる わけ 。 


人 け ゴ 
キー ン >J」 


ッ ト 
の 

ッ ト オ 
ウ 
ト . 


4 少し ずつ 範囲 を せ ば め て い ぐ 。 


ファ ン ツ ジッ ク な ゆめ つ だ り ゲ ー ム 
: ③ 放 物 線 アタ ッ ク 


グン と と っ 、 各 馬 い っ せ る だ ぴ ひ に パン ノン コン が それ より 大 きい か : RUN さ せる と 放物線 が 、 ポッ ポッ ポ 


1 RANDOMIZETIME:CLS:PRINT"※ サイ ハ Tmini %": ヨッ ツウ": Y:LOCATE9, 3:FORL=1T05 :COLORL: 
PRINT "FT "23SPC(35)jL:NEXT FORR=9TO1 :Z= INT(RNDx5)+1:A(Z)=A(Z)+1:COLORZ:LOCATE9,Z 
2+1:PRINTSPC(A(Z2) う 5" ェ FT "ER=-(A(Z)=37 ) : NEXT :COLOR7 :LOCATE9 , 14:PRINTMID も ( "ハス ^ レ アタ リ ! 
" ャ ー( の =Y )※4+1 .4) 


1 RANDOMIZETIME:CLS: PRINT"xX カス ^ ア テ サ トー ム %": AS も (9 )=" ア ッ タ リー! " EA も (1 )=" モ ッ ト チ イサ イ ヨ ! "1A$(2) 
"モッ ト オ オ キイ ヨ ! " :C=9:R=INT(RNDx199)+1:FORB=9TO1:C=C+1: INPUT " ヨ ソ ツウ (1-199) "1D:E=-2%(R>D) 
-(R<D) : PRINTA$(E):PRINT:B=-(E=9):NEXT:PRINTCj "カイ テン シタ 。 [HIT ANY KEY!]":F も =INPUT 
$( 1 ) :GOTO1 


19 RANDOMIZETIME:CLS:FORR=19TO39:CIRCLE(RNDX649,RNDx299) ,R,、5,。。。F:NEXT:TINPUT "POW 
ER(9-199) "iP:P=(-P-(P>199)*x(P-199) )x(P>9) :FORX=9TO639:Y=PxX(XxXX-649xXX+192499!)/19 
2499!+299-P:C=POINT(X,Y):BEEP-C:PSET(X,Y,2):BEEP9:S=S-C:PRINTCHR も (11)j "SCOREI "5S 
soSPC(19):NEXT 


の ・ 。 0 初期 設定 6 ・ 画 プ ロブ ラム の 説明 

わび さび の 逆襲 20 ゲー ム 終 了 ラ イン 表示 < OPEN YOUR ・10 機械 語 の 読み 込み 、 時 幸 
【( リス ト 1 ) ・ 30- 70 メイ ン ルー チン ・EYES (リス ト 4 ) ・15 時 報 の 間 待 つ 

画 変 数 リス ト ・ 30 スベ ー ス を 押し た か 離し た か ・ 一 変数 リス ト ・ 20 ラン プ を つけ る か カ 消 すか 決定 
Ds.…… わ びさ びっ ・ 40 ” タイ ミン グフ が 合わ な いと き グ ブ :R.…… 当 た だ り ま で の 加 数 ・ 30 ラン プ 表 示 、key 入 力 、 剖 定 
1 3 わび きび っ …… わ びさ び ぴ つ 6 ラフ の 伸び を 一 定 に ・N…… フ ァ ン フシ ョ ン 番 号 ・ 40 判定 

わび さび つ ・50 プラ フ の 伸び と 得点 ブラ フ 表 * BS……4 文 字 の 文字 列 ・ 50 ゲー ム ・ オ ー バ ー 処 理 
| 画 プ ロブ わび さび つ ラ ム の 説明 5 示 ・ AS(①)-AS(4)…… 文 字 発生 の ワー ク 変 数 ・ 画 マ シン 語 の 説明 
1 10 わび さび っ ・ 60 ゲー ム 終 了 確 認 ・ (4 妥 守 ) ・ 000 一 E002 010 番 地 の 内 容 を ヘレ ジ 
1 わび さび ぴっ つ わび さび つ ・ 80-120 ゲー ム オ ー バ ー ・ OS 入力 文字 5 スマ へ 転送 

6 。 が ・D…… 正 解 ひ どう み の フ ラ 8 ー ラ > 示 サブ ・ ル ー 

! SPACE SPACE ジラ の あの ぱら きい 語 0 2 し に 。 。 : ラン Woo 
[ SPACE (リス ト 2) :( リ スト 3) ・。 CMDCLS1 を と れ ば 、N BASIC で ・ E006 BASIC に 戻る 
| 変数 リス ト ・。 フン! いこ くら プ ログ ラム 作 つ て も 0 グ ・ も 遊べ る よ re 5 キー ボー ド パニ ッ ク 
| 央 ae 右 に 伸び る プラ フ の XX 座標 ラム な ん だ も ん 一 。 ご ん な も ん で 十分 じ ・ CAPS ( リ 区 ト 5 ) @ イキ ー ツ 
| 得点 プラ フ の vV 座標 ・ や 1! つ 一 の は ウン 。 ホ ント は いそ が し か : ・( リ スト 6 ) 

P……- 得 点 。 つ だ の だ 。 で は まだ あう 日 まで -。〈 バ ン < 一 変数 リス ト 。 変 数 リス ト 
1 em スペ ベー スキ ー を 離し だ ガ 確 認 用 : プ ) 20216 乱数 、 機 械 語 呼び 出し 用 sy 片手 か 両手 ひ の 入 力 キー 
1 ロ … ハ イス コア ・ 。 と いう わけ で 、 変 数 リス ト 等 は あり ま ・ TL…… タ イマ ー ・ A…… プ レイ ヤーg の 得点 
“ プ ロ プ ラム の 説明 ・ せん 。 山 科 さ ん 、 す いま せん (て エ イキ チ ) ・ し …… 0 な ら ラ ンプ を つけ 、 1 な ら 消 す ・ B.……- プ レイ ヤーb の 得点 
し 


重 了 際 、 〈 競 馬 mini〉 よ つ ち ゃ ん は 馬 の こ と を ヾ いす と 言っ て まし た 。 パン プ と ジュ ユー ス を 賭け て や ろう つて 言っ を けど 、 パ ンプ ブ 
9 枝 , が 勝つ た の で 、 無 効 に な か つて し まい まし だ た 。 


ッ と いう 感じ で 表示 され 、 一 瞬 、 気 分 
が プア ンタ ジッ ク に が ぁ ら て きた ころ で 、 
ゲー ム 開 始 。"POWER” と きい て くる 
の で 、(0-190 の どれ か の 数 字 を 入れ る 。 
り タ ーー ジン も し て で じゃ っ と 見 て る と 点 を 々 と 
放物線 が 現れ る の だ 。 こ の 放物線 が ど 
れ だ け 長 いあ いた 円 を 突き 破っ て いく 
か を じっと 見 守る の が キミ の 役目 。 
ゆっ くり ゆっ くり 動い て 、 目 標 ま で 。 
不思議 と 落ち 着い た 気分 に な る ゲー ム 


ま 、 よ ー す る に 、 な に か キー を 押す 
と どん どん 、。 し か も ラン ダム に デブ プログ 
ラム が 画面 に 表示 され る 仕組 みっ て わ 
け 。 ほ と ん と JR-200 に は な い コ マン ド ma 
や ステ ー ト メン ト ば か り だ けど 、 ち ょ マウ ー 
③ う を 見 だ だ け は だ と 、 ほ ん と に すず すごい ア 
ログ ラム を さっ そう と 打ち 
こん で いる よう に 見 える の 
電 5 

彼女 が きた と き な ん か に 


これ を や る と 、 思 わ ぬ 効 栄 
を 発揮 する か も 。 

わび さび ブログ ラム の な か 
で は 、 い ちば ん 長い けど 、 そ 
の か わり 、 実 用 的 な 使い 方 も 
可能 な 、 珍 し いわ びさ び ソ フト 
と る の で は な が いで し よう か 。 
ちゃ ん ちゃ ん 。 


Se 


MER (て ロー199) 2 
> 、 貧 】 島 


4 な ん だ か ファ ンタ ジッ フク な 画面 。 


の びさ び ラ スム た 


REM_JR-EOO_SUFER FRDGRANM BEY _T。NMINMURA 
COLOR 7。QgiCLSiFHEE ま CAOO。OgFPOUEE 0。O: TEMFOU 109:DINM 人 生 (104) 。 人 ま *12O 
FRINT "Ready"iFUR 1T=O_ TO 10 ミ READ 人 Q ま (1) :NEXT:N=Os RQNDUMI ZE 
NN+10: N 和 も =STR ま (N) = RTGHT ま (N ま 。LEN(N ま ) 一 1 ) すす "リキ 人 まま (INT(RND(1) *104) ) 
IF_RND(1):。7 ロ R LEN( ま ) BOO THEN プア 
内 生 三 仙 和 ます "ミリ キロ も (TINT(RND(1) x*104) ) : GOTO 
生生 仙 和 ます CHR ま (1 計 ) =FHR エ =1 TO LEN( 人 も) 
FRINT MID ま (人 和 。T。1) 』 SOUND 2OOO。 SD=C 
FICE CiTF C=Q_ OR C=D THEN 9 
J) NEXTiGOTO 4 
) DATA_ "EXEC HFEOO" 。 "CLEAR &H6FOO" 。 "SDKINI QOV。 "FILES 1"。 "9HCOFY"。 "LORD" 。 "LOADNM" 
DaTR "MERBE"。 "NEM" "RUN 100" SRVEN "FROGRAM" 。 H6000。&H61FF " 。"BEEP"。 "CHRIN" 
< DATA "CLOSE 1" "DEN INT 7"。 "DEF FNA ニ XXY+ZV、"DEF_USRO=&HBBOO" 。 "END" 
っ DATA "ERASE 。E,C"。 "ERROR 5"。 "FOUR T=O TO 10"。 "FOUR X=1 tO 30O_ STEP 5"。 "BET 1" 
DATA "GOSUE 1000"。 "BOTO 12O" "ITF ATEEC THEN 内 RTCVT "INFUT FEEE() =Q THEN END" 
っ DATA PINPUT a"。 "KEY 5。"Boo! "0 "EEY LIST"。"LPRINT 人 "PTMOTOR 1" 。 "NEXT" "NEXT エリ 
DAT "ON ERROR GOTO 2OO"。 "ON X GOTO 100』 OO。 SOOW。 WON Z GOUSUE 1Q0QOO。2O000。 き OOO" 
入 際 内 EN "TV の FE し LE リマ SEUIT 4 グ 2。nF。、 "MGDT eV PPUEE R。B"。 "POEE HEBOOO 。 1 さ " 


いひ CR お 相 ト う F* 


今回 の バカ ウケ 賞 。 


超 必 殺 プ ログ ラム 


FOR JAR-200 


9 寺 大 Py1 


oo ざー チト まっ デー > DAT "FRINT ATB"。『PRINT "TENSAT"* "PRINT USGING "SCORE 間 寺 苦 日 ISCURE 電電 震 "は 。H* 
な ーー ん だ 、 な ん て だ れ カ に 言わ れ ぞ そ DATA "READ A"。"RERD まま"。"REN wk FRDUGRASM kw"。 "RESTORE 1QOOO"、"RETURN" 
。 7 っ 芝 吉 上 J DAT "SMAP Aa。E"、 "CTRCLE (X。Y) 。100。7。。。PSET"。"CLS" "CDLUR フ 。O"。 "CULOR AB" 
9 だ けど を 、 ろ れれ に ぱ ば ま いり ま し だ た 。 DATA "COLDR=( ミ 。 旨 ) "COLDR= (5。) "。 "CDNNECT (X。Y) 一 (X1。Y1) 一 (X2。Y2)" 
に F DATA "CONSOLE 0。23。O" "BETB (X。Y)ー(X1。Y1) 。A"。"LINE (X。Y)ー(X1。Y1) 。、PSET。5,EB" 
0 この 。 与 真 を 見 て くれ れ は ば わか 5 DATA "LINE (10O。Q) 一 (300。150) 。 さり 。 "LOCATE x。Y"。"PAINT (XY) 、5。1。2" 
6 上 DATA "PLAY 朋 多 。 昌 まあ 。 じ まり 。"PHINT (XY)"。"FUTa (X。Y) 一 (X1。Y1) 、A"。"FRESET (X。Y)" 
人 な S よ つの に で モイ キチ か 気持 ちよ さそ う DaTA "SCREEN 1。.2。3"。 "SDUND 200。200"。"TEMFD 90"、"VIEM (100。50) (5OO。 150) 。 2" 


DaT^a 
DATa 
DaTA 
DaTA 
DATA 
DaTA 
< DaTA 
5 DaTA 


"MTIDTH BO。 25" "MINDOM (100。109) 一 (400。50) "9 。"D=AES(C) "。 "し = モ QGC (G ま ) " 
"RTN(S) " 。 "人 和 ま =CHR も (人) "アニ COS (8) " 。" 仙 和 ま =DATE ま "。"F=FRE(O) "。D="DSKF (O) " 
"IF INF'(O)=Q_ THEN デリ 人 朋 ま INFUT 生 (18) りり =INRTR(。 人 QB ま ) "の =INT (人 Q) " 
"RINT(RND(1) 12) キ 10 "し = ニ LEN (人生 ) りり 生ま あ =MITD ま (人 も 。 さ 。) "PP=PEE ド (人 Q) " 
"=PUINT(X。Y) りり =RTGHT 生 ( 仙 ま 。) "。"G=SCREEN(X 。Y) "。"X=SIN(S) " 

"FRINT SBPC(BO) ! 。 "5 も =BPACE ま (人 Q) " "ESTICK(1) 9" し =STKINGB ま (12。"O") 

"HH 本 =STR も (H) "FRINT TAE(2O) "。 "RANDOMIZE(TIME ) " 。" 征 和 =T IME ま " 

"UEUSRO" 。 | り ま =VL ("SH キビ) ” 


に プロ グラ ム を 打ち こん で いる で し ょ 
う 5。 れれ は ほ は 、 月 を つぶ の て いて も 、 ず 
ご で て 具 し で うか ブロ グラ ム が スラ スラ 
打てる 超絶 技 ソ フト な の だ 。 


ます 
| 
AS…… 入 力 キー ・ VPOKE で スキ ー ヤ ー を 表示 ・ 数 あて ゲー ム ・ に 苑 理 演算 を 使 つ て 判定 し て いま す 。 興 | 
田 プ ログ ブラム の 説明 ・ LOCATE 文 は 旗 の 位置 s ・ 味 の ある 方 ほ 解析 し て 参考 に し て ね 。 
10 片 用 ガ 両 用 か を 決定 < jF 文 は あり J え し た か どうか 5 ( リス ト 9 ) ・ (ヒロ ) | 
20 初期 設定 ・ PRINT み ら ゲ ー ム オー バー 処理 ・ 一変 数 リス ト ・ 、 と ょ ー 
30-- 80 片手 用 の 得点 を 判定 ・ 画 チ ェ ン フ ・ ボ ポイ ント ・ AS()…… メ ツ セ ー ジ 用 ・ 超 必殺 プロ グラ ム 
90 一 140 両手 用 の 得点 を 判定 ・ 1 行 に は いる ぎり ぎら の 文字 数 な の で 、 ・ 日 …… 当 た の は ざれ の フラ グ ブ ・( リ スト 11) | 
150 それ ぞ れ の 得点 を 表示 初期 設定 が ちがう と 走り ませ ん 。 秘 ず 最 ?。 C…… 回 数 ・ 一 変数 リス ト | 
160-180 勝 剛 定 ・ 初 に Screen 1 : key Off と し て あご ・ D…… 予 想 し な 数 ・N… 行 番号 ! 
2 ら 吉 寺 (よっ つ ちゃ ん ) ・ 三 …… 予 想 し だ 数 と コン ピュ ユー タ が 考え * 〇 .…- キ ー 入 力 
か っ そ ー6( リ スト 7) ーー 7 ・ だ 数 を 比較 し た 結果 ・AS( )…… コ マン ド 等 デー タ | 
較 変 数 リス ト 。 - 競馬 -mini ( リス ト 8 ) ・R…… コ ン ビ ュー タ が 考え だ 数 ・D…… 直 前 に 押さ れ だ キー | 
W…… ス キー ヤー の 位置 ・ 玉 変 数 リス ト M ・ 画 あ 
き ……… スベ ー ス ・ キ ー の 状態 ask 各 馬 の 位置 る 放物線 ( リ 4 ト 10) s SYS ' 
|…… ス キー ヤー の 進ん だ 距離 ・ 人 R…… ゴ ー ル に 蕎 い た お の フラ グ 、 画 変数 リス ト ・ 2 一 3 初期 設定 | 
P…… ら の 値 の 変化 を 知る も と ・ Y…… 予 想 し だ 馬 の 番 号 ・C…… 放 物 線 と 円 が 重 な つ だ の フラ グ ブ : 4 7 プロ グラ ム の 1 行 を 適当 に 了 定 | 
層 プロ プラ ム の 説明 詩 ・Z…… 馬 を 動か ざ 数 ・P…… パ ワー ・ する 。 
W 三 6480 ま で 初期 設定 ・ 画 チ ェ ッ フ ボ イン ト ・ ら S…… ス コア る. 失 1 文字 表示 
VPOKE で スキ ー の 跡 ・ 実行 する まえ に WIDTH 40、25 を 実行 ・ X.Y…… 放 物 線 の 座標 ・ 9-10 キー 入力 処理 
次 の IF 文 は あ だ つ た だ か どう か ガ 。 し て ご ださい 。 ( ビ ロ ) 。 画 チェ ッ フ ポイ ント ・ 50-73 デー タマ | 
WーW+ ら ・2 二 1 は スキ ー ヤ ー の 動き ・ ・ この 3 本 の プロ グラ ム は IF 文 を 使わ ず : 」 
ーーーーー ニ ーーーーーーーーーーーーーーーーーーーー 一 ーー-ー ニ ーーーーーーーーーー ーー ーー ーー コ 


数 あて ゲー ム >〉 単純 だ けど 、 疲 れ な い ゲ ー ム だ ね 。 1 回 で 数 を あて だ 人 は 、 今 すぐ ご 易 者 と な つて 下さ い 。 回 以内 な ら 能 


あり ます か ガ ら 新宿 の 田 (有名 な 易 者 ) の 弟子 入り で も し て 下さ い 。5 ら 回 前 後 は 普通 の 生活 を 、 それ 以外 の 人 は 知り ませ ん 。 ク 3 


の びさ ざさ び プロ グラ ヤー ズ 


第 1 期 黄 金 時代 を 某 お が お され て し まつ だ 9 人 入 


で 応 大 先生 


:『 わ びさ び の 逆襲, 


。 うー お む 。 と うし で こう いう こと に な っ て し ま 
。 つた の だ る う 。 も と も と 、 て の ヲ プロ グラ ム は 
・ Typing in a cls と いう 、 ど こと な く 芸 術 的 な ・ 
・ ひび ひき の ある ・ ・ 
タイ トル だ つ ? * 
た の た が 。 思 : ・ 
わ ず わ びさ び : 
に の せら れ て ・ ・ 


に < あみ 
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: 風 の 谷 の 
: プロ グラ マー 


:『OPEN YOUR EYES』 


・ 生 物 部 で ウジ を 集め 
・ る 元 生徒 会 長 。 バ パソ 
・ コン 歴 1 年 2 カ月 。 
。 自分 の 作っ た も の の 
・ な か で は 最高 の で き 
・ で す 。 な お この ゲー 
> の タイ トル は 「6 
・ か いも か き な お し た 
・ と いう で ん せつ て き 、 き ろく を も つ H. 
。 KATAYAMA 
『 ほ ん も の か っ そ 一 6』」 の 略 で す 。 
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ご し いう ね わ で 、 わび さび の 八 赤 の ご 
2 0 
わか 4 いま 
まで 、 作 つて み だ け ど 採 用 な れる は ざ ず 
な し の らら この な ん て 思い こん で 、 ガ かぐ 


1 ぎょ う プ ログ ラム だ いし て ・ 
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『CAPS」 


1 ブロ グラ ム が の っ た の で ・ ・ 
・ : と て も うれ し いで す 。 友だち に MZ-2000 や M ・ 


ぼく は 、 は し め て 自分 の ・ ・ 


(ンプ 

・ ソバ ンプ の あっ ぱら ば ー』 
か か つ | が あ 
・ の りり リキ いい 
@ 大 | 1 
・ 作 N ま を い が 
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2 が し が かい 
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し に で ちい い 
NO 
・ す か バ パ に で が 
@ ね 二宮 し 
そ の うい 
0 
ヽ 
くべ ペ そ ぞ 


( ララ テース 
・『 キ ー ボ ー ド バニ ッ ク 』 


6 6 S X を 持っ て いる 子 が いる の で 、 や っ と 自慢 ・ * 


疾 し けい | 人 て : : で きま す 。 ま た ひま が あれ ば 、 短い アイ デア * 
) た で を て 化 : : も の の ゲー ム を 作り た いと 思い ます 。 
年 お 兄 た "の ち ・・ 
も 兄 さ が し 谷 は ・ 
や さん ば の 「・ 
9 ん ドナウ ロラ 16 < 
の 電 
ハ 所 ン 有 丸 較 
の ソ に カ 力 を ラ 新 ・ 
区 な の 笑 マ 5 
シリ お う 
ま 音 ま か て 


中沢 
: 『 移 馬 mini」『 数 あて ゲー ム 』 
:『 放 物 線 ア タッ ク 』 


rl 
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て 美 テ ーー ナ N 
Ni ご SF 帯 閉 ASー・ の 有 ァ ・ 8 


rr 
ヾ へ 必 旭 澤 ル 。 計 ご て 州 て 民 避 2 
J 葵 叫 以 MINHN ゴ im8 半 避 
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人 全 人 9 
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・: この ブロ グラ ム は 、 友だち と 遊び な が ら 作っ ・ 
・ た も の で す 。 ポシェ ッ ト に の る な ん て 、 思い * 
・ ・ も より ませ ん で し た 。 マ イコ ン の ほか に 好き ・ 


も し ろ い ! 
最高 た ね 。 


三村 俊彦 


の 才 / 2 


| な っ た ん た けど と ・ 
| 生徒 会 の 副 会 長 ・ 
] を や っ て いる の ・*・ 
』 で 、 そ っ ちの ほ : 
うい で の がく 5 
原稿 書く の お く ・ 
。 れ ち ゃ っ た ん で ・ 
す 。 すみ ませ ん 。 で 、 ぼ ぽく の 特徴 は 、 背 が : 
高く て 、 ま ゆ 毛 が つなが っ て いて 、 ほ っ ぺ 
た が よく 伸び て 、 お も ちゃ に され る こ と 。 


も わび ご さびし レ し て みな い ? 


し て い だ 人 も ちよ ちよ つと 見 せ て ぼ ほし 
いな 。 そ りゃ や 、 採 用 ・ 不 採用 は モノ に 
よる けど 、 も っ つと も つと お も し ろ い プ 
ログ ラム が 見 て み だ い ん だ よー ! 
送り 先 は 、98 ペ ー ジ の 募集 と 同じ 。 
一 記 『 わ びさ び プ ログ ラム 』 と 表 に 書 


いて お いて ね 。 あ つ 、 ひ と つ 条 件 が あ 
る 。 そ れ は 、 短 いこ と | 少な く と も 
ハー フ プ ログ ラム 程度 まで 。 短 けれ ば 
短い ほど うれ し い の だ 。 

ん じゃ 、 採 用 枠 を あけ て まつ て る か 
ら ね ! 


し (放物線 アツ ッ ク 〉 うわ さ の 1 行 プ ロブ プラム だ ね 。 う ーー ん 、 ア イデ ア は いい けど 、 放 物 線 が 描 ガ の れ て いる 間 は 、 ち よ つ と まち 


KA 2 杭 ) ご お し いな あ 。 で も 1 行 だ も ん 。 許し ちゃ う 。 
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< 用 ン バ ン に な っ ちゃ っ た よ ぉ ん 。 あ ん ま 

きき 人 有川 り い た いも ん だ か ら 、 整 骨 院 に 行っ た の 。 

計 用 そし た ら 、 お も いっ きり ふくらはぎ を 押 

す の 。 あ れ は マッ サー ジ な ん て も ん じゃ 

間 、 上 | な い ネ ! は っ きり 言っ て 涙 が 出 た も ん 。 

NN ト 人 川 今年 は ほん と に つい て いな い ョ ! 助け 

NM ipa て くれ えて っ 1 

東京 都 ・ 摩 可 な っ つ 式 す っ か り 常 連 に な っ ちゃ っ た 人 SR な な な 

ネネ ! あたし も これ くら いか わい いと 、 も て る ん だ けど oO Ce OO CE た 

な あー。 実 


の ぁ あわ ゆー い / や へ 


大 阪 府 ・ み の だ けん いち 区 胃 の トー ン を 切る の に 時 ノ 人 CO 6 


ト 


/ 


0 
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間 が か か っ た そう で …… 確 か に すご い ! ボツ に し た 6 いい 2 
うら まれ そう な 作品 で すね ェ 。 お みごと ! どう も あり 議 
が と ね 。 宮 90 et : 


ee 
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と は プロ 
2 うん を で 
ポス ひる . 
用 ん ーーー 
ナジ の \ = 2 
ぶん ば っ に 
SN 


ょ を 
あな た は 若い / 


ツウ グラ ム 大 臣 認定 書 あ り が と う ご ざ ん す 。 よ を 様 で は 、 

な ん の 価値 も 、 味 も な い 所 が 子供 達 に 受け まし た 。 私 め 
も 5、 お じ さ ん 大 臣 に まつ りあ げ ら れ 嬉 し い の も 通り 過ぎ 、 
毎日 カガミ を 見 て 「 ど こ が お じ さ ん の 顔 だ ! まだ 若き 
は 充分 だ 1!」 と 思っ て いる ん で す 。 今度 ゆみ 様 か ら 手 紙 
ON ンド EMReee 全 還 6 4RoaB や で の 馬 っ 第 
重松 津留 ニオ ジ サ マ ) さき 。 ろ スト ウン あっ 信 
廊 ラ ブレ ター 以外 っ て こと は 、 採用 通知 も 受け と た っ て く 《 | | し 、 こ os.、 ト 評 才 の 丘 具 AO さん) 


れ な い の か な 7 スパ ラン シイ ブロ グラ ム を 作り 続け れ ば 、 Cc DO Sm ュ の スズ ペー スプ きっ っ きず) 
老化 は 防げ ます 。 が ガン バッ テ 下 さい ネリ! 区 RA 色 ウ くい 全 


M 


【 
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、、 ボリ ェ ッ ト な ん で も ベス ト テン ) 第 1 回 あい ら の 好き な 息 庶 ペ スト テン の アン ケー ト を 募集 し ます 。 資格 は 和良 を 入 べ だ こと の ある 人 。 の 2 
-(⑥' 人 o 年齢 不問 。 自分 の 好き な 給食 の メニ ュー を づつ 書い て 送 つ て ネ 。 あま つた スペ ー ス に は 、 給 食 に つい て の 療 見 や ゅ 


鐘 ーー SWEEPER の OMD 命令 文 解説 書 を お 送 
り し た みな さま へ 。 和 便 屋 さ ん か ら 「 料 金 不 

足 」 と いわ れ な か つ だ で し よう か 実は 、 
CM 命令 文 の 一 時 重量 オー バー で テ フ ボ ポリ に も どっ て き て 
gE し まつ だ も の が あつ だ の で す 。" 料 金 不足 」 で 
切手 に バグ あり / 罰金 を 取ら れ て し まつ だ 方 、 ど う も すみ ませ 
、 す 、 す み ま せ 一 ん ん 。 も ちろ ん 、 そ の 入金 は こち ら で 負 担 し ま 


ら WEEPER 


PRINT:PRINT ^Score′:S 
P4 
15 PRINT:PRINT Score”:SiCSR 


スコ ア こ 乱数 面 を 


つけ まし た 。 


85 NO. 2 の 「 ノ ー キ ーkum」 で 、 ス コア 

と 乱数 面 を つけ まし た 。 

P0 

22 IF =21 THEN 21 

28 征 =300 : PRINT “ROUND” ECS 

民 馬 て こ に 、」 CSR 10. (人 の 。 

30 PRINT CSR 0O:sCSR 古 “ 東 

人 I 

60 IF KEY= GiGOSUB #3G 

OTO 28 

P1 

210 $=“、 :FOR 0=0 TO7.$ 

=$ 十 A$INT (RAN せ * 4)):NEXT 

O'$ モ $5 二 で こ 

211 RETURN 

お ゼ 2 

5 S=S+T:FOR Z=0 TO 150: 

NEX] Z 

35 IF 1=21 THEN #4 

40 PRINT:PRINT “NEXT ROOM 
1 1 PRINT:RETURN 

PE3 

20 PRINT “Game over 2 


し ーー コト ーー ルーー ゴ し 4 


で に NRRIND 

(滋賀 県 ・ 田 中 宏樹 クン ・15 茂 ) 
太 スコ ア を つけ る の は いい と 思う 。 た だ 
し 、 乱 数 面 は 不可 能 な 場合 も ある の で 、 
あく まで も 乱数 と の 勝負 と な る が 、 コ ン 


ピュ ー タ に 乱数 面 可能 判定 を させ る の は 、 


メモ リー 不足 も ある し 、 無 理 か な 。 
(た けち ゃ ん ) 


へ a な る 0 
ご こ < て いび こい 任 ょ se 


自分 の 機種 で も 走る / 上 の よう に 秋 陸 し て 下さ い 。 


"85 NO.2 の 「T-GAME」 を 、PC-1245 
て 走ら せ て み ま し た 。 

10 2$5 2⑫1) *21 ツ 26 5) *15 

15 
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す が 、 住 所 を ひか えて いな か つ だ だ め に お 送 
りす る こと が で きま せん 。 視 金 を 払わ され て 
し まつ だ 人 は 、 ぜ ひ 、 ハ ガキ で 住所 と 氏名 、 
害 金 の 額 を 書い て お 知ら せく だ さい 。 折 りか が 
え し 、 ハ ガキ 代 40 円 十 神 金 分 を お 送り し ます 。 
ほん つと へ ーー に ご めん な さい ん 


20 ノ $ ( 0 ) に ーー に he 


ん 
に ー ド ヒー) トーー コ に ヒー ヒー コル ーー) 


30 TO 21 避 TO 15 

20 ニク キー 

60 WAIT 100: PRINT “、TSUN 
AHIKI、 1245 |: WAIT 0: PR 
INT ““ 

70 1= テ 8 

120 &F84A 人 &FS868 

130 &EF837 プ &F828 

150 1=22 ツテ 16 

180 &F832 ⑦&F81E 

190 POKE &F82D,&06, &02, 必 42 
&22. を 1E &04, &03, &42 & 3E 02 
210 必 EF82D マツ &EF819 

230 必 EFE828 マツ 人 &F819 

240 &EF837 人 &F828 

250 POKE &EF82D, &00, &40, 20), 
&1E &00, &42, 入 3 F, 02 42. 層 3 
EE&0A&4A&3E 09, &08 


(大 阪 府 ・ 武 市 賢治 クン ) 
廊 PC-1250・51 か ら PC-1245 へ の 移植 は 、 
メモ リー の 問題 を 解決 すれ ば 不可 能 で は 
な い 。 自分 の 持っ て いる 機種 に 移植 を す 
る こと は 、 互 い の 機種 の 知識 を 深め る の 
に 、 と て も 有意 義 だ ね 。 (た けち 


上 ポ * リ ェ ッ リ トー ゅ エピ ソー ド を 書い て ネ 。 氏 名 、 年 齢 、 住 所 、 電 話 番号 を 忘 れず に ネ 。 あ て 先 は プロ グラ ハム の 募集 と 同じ 。 ア ン ケ ー ト を 出し 
の の . @* 全 公 oO ネネ 反 て これ だ 人 の 中 か ら 抽 選 で 5 ら 名 に な に か ガ あ げ ま す 。 な ん に し よう か な 。 婦 
由 、 GOG 
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@ 人 広島 県 ・ 木 原 設 傘 ク ン 
福 眠 鏡 を は ず し た 顔 一 一 き 
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ゃ 埼玉 県 ・ 武 川 雅明 ク 
ン 志 ノ ー マ ル だ けど 
プラ 板 っ て と ころ が と 
っ て も うれ し い 『 り 区 


専大 分 県 ・ 重 松 純 二 
クン 区 セー ラー 服 
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中 みて で る ん 。g と | 
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CC ある も し の そん が アロ グラ ム や を 
ポシェ ッ ト は 求め て いる の だ 。「 最 近 、 
勉強 や 部 活 が いそ が し く 〈、 休 ん み の 日 く 
らい し か パソコン で 遊べ ませ ん 。 で も 、 
な ん と か ヒマ を 作っ て ブログ ラム を 作 
ふら て いき だ いと 思い ます 。 ヨ ロン シク グリ! 
え 一 、 い る きか か ん だ ん で は ご ざい ま 
す が 、 こ れ を も っ て あい る つ に か える 
は て いた だ だき ます 。 人 作 し まし た デ 』 
ちゃ ん ちゃ ん 。 と いう わけ で 、 グ ラム 
総理 大 臣 は 通算 200 グ ラム の 厚生 大 臣 ・ 
豆 後 泰 孝 く ん に 決定 。 近 々 購入 予定 の 
X 1 用 ソフ ト 10 万 円 分 を 贈り ます 。 ぎ 
えー、 う ら や まし い 。 希望 ソフ ト を を 
ろ ぇ える の に ちょ っ と 時 間 が か か る の で 、 
し ば らく その まま で 待っ て て ね !! 


通算 200 グ ラム の 大 耕 に 乗っ た の は 宮 後 
くん た だ ひと り ! この 大 量 の グラ ム 
の まえ に 、 ポ シェ ッ ト グ ラム 総理 大 臣 
番 議会 は 屈服 し た 。 世 の な か 、 金 の あ 
な も し まし C 。 また に めく 、 や だ らち ら う むれ る や つが えら い 。 ボ ポシェット で は 、 グ 
し く て 思わ ず お どっ て し まい まし た 。 ラム の 多い ほう が えら い の だ 。「 実 は ぼ 
と ころ で 、 正 直 い っ て 自分 が 誇れる の く 、 ど ん な に ガン バッ て も 長い ブログ 
は ソフ ト の 時 だけ だ と 思っ て いま す 。 ラム が 棚 め ませ ん 。 と ん な に デモ に こ 
質 を 比較 る れる と と て も じゃ な いけ と ど 、 っ た り 、 隠 れ キ ャ ラ や B.G.M. を つ 
負け で す 。 と く 〈《 に 、PC-8801 の 柳田 る け 。 ス テー ジ を 多 〈 し て 6200 行 く 6 
ん の マシ ジン 語り の きれ いな ゲー な な と は い に し に し かなり ませ ん 。 し か も オー ル B 
感心 し まし た 。 脱帽 』 す 、 鋭 い ! 総 ASIC。…… で も 打ち こみ や すい の が と 
理大 臣 を 決め る と きも 、・ 質 の 柳田 対 量 で も よう そう な の だ よさ 。 5 
の 宮 後 で 最後 まで も め た の だ 。 し か し 、 こみ や すく て 、 わ か りや すく 〈 て 、 短く 


就任 の 弁 
「 総 理大 了 臣 に し て くだ さっ て どう も あ 
が たつ うごき ゆい ます いえ を いえ と 一 い 


第 1 回 の グラ ムシ ステ ム は 好評 の うち に 、 
つい に 総理 大 臣 を 世に 送り 出し て 終了 し まし 
た 。 No.3 一 No.5 で は 新た に 、 大 胆 に も 柔道 方 
式 を 取り 入れ た グラ ムシ ステ ム を は じ め ま す 。 
賞金 は 従来 どおり 1 グラ ム あ た り 300 円 。 昇 進 
の 方 式 が ちょ っ と 変わ り ま す 。 


・ 採 用 され る と まず :…… 白 帯 グ ラム 。 こ れ は 但 原 田 秦 蔵 13 ジ ー ラ の 火災 が 最高 、50 グ ラム 。 


単に 誌上 で 名 前 を 呼ば れる だ け で 、 特 に な に 
ご と も あり ませ ん (も ちろ ん 賞金 は あげ ます )。 
70 グ ラル 上 に な が なると" 黒幕 グラ ム 。 黒 
帯 認定 証 と 記念 品 を さしあげ ます 。 
・100 グ ラム を 超え た ら ・…… 柔道 界 で は お そ 
れ お お い 赤 帯 グ ラム 。 No.5 まで に 赤 帯 グラ ム 
まで た どり つい た プロ グラ マ は 、 ポ シェ ッ ト 
整 生 棚 の 赤 沿 ゾ ー ン に 入っ て いた だ き 、「 黄 金 
の 帯 争奪 戦 」 へ の 参加 資格 を 与え られ ます 。 
「 蓄 金 の 帯 争 奮 戦 」、 と は ? 謎 が 謎 を 呼び 、 
スペ ー ス の 関係 で 説明 は 次 号 を 待て / 

で は 、 エ イキ チ に よる 今月 の お けい こ 開 始 。 
丸 で 囲ん だ 数 字 は 、 掲 載 ペ ー ジ 数 で す 。 

将 Y 

倫 プ ー さ ん ⑥ て や ぁ / むん 、 な か な か キャ 
ラク タ 使 い に 腰 が 入っ て ます ね 。40 グ ラム 。 
人 落合 和 疹 ⑦」 寺 が きい て 、 楽 し い 1 画面 。 
柔 よ く 剛 を 制 し て 、 い き な り 黒 帯 の 70 グ ラム 
グ 食 横 田 啓 ⑧ 実 力 は ある けど 、 も う ひ と 皿 。 
30 グ ラム 。 倉 肝 健 衝 了 ⑨ け いこ に は げ ま れ 
よ 。 30 グ ラム 。 倫 内 田 寛 (0 1 画面 に も りこ ん 
だ スト ー リ ー で けさ が た め 。40 グ ラム 。 久 徳 
丸 裕一 ( ひ ア イデ ア の 身 の 軽 さ が 頼も し い 40 グ 
ラム 。 代 井 上 優 (0》 な ん と か 水準 の 30 グ ラム 。 


お に 
ダ Ac 
クツ 東邦 


@SHINICHI(④⑫ や さ し い 私 と し まし て は 、 ス ズ 
メ が な ん だ か か わい そう 。30 グ ラム 。 欠 大 野 
雄司 (5 不思議 な 魅力 。 50 グ ラム 。 氏 URB(6) 
新 機種 な の で 点 を 甘く し た 。 で も 、30 グ ラム 。 
人 @ 野 鳥 努 0⑭⑰ ピ ビビ ピッ 、50 グ ラム 。 単純 な む な キ ャ 
ラク タ に こめ られ た イメ ー ジ が いい 。 欠 寺 (8 
ファ ミ ベ ー の 技 を うま く 使 っ た 30 グ ラム 。 欠 
14M131 て か 2⑳⑯6 ま だ わき が 甘い 。 シ ョ ー ト な ら 
も う 一 味 ほ し い 。30 グ ラム 。 氏 TAKAO @9 お 
お っ 、 見 た こと も な い 技 が 新鮮 。 将来 が 楽し 
み 。40 グ ラム 。 氏 天下 御免 の Mr.ASAIGD キ ャ 
ラク タ の 笑顔 が うま い / グ 50 グ ラム 。 欠 サ ン 
バ パレス 博多 G) ば る ちゃ ん が か わい い 、 と も え 
投げ の 60 グ ラム 。 倫 志賀 徹郎 33 校 庭 10 周 / 

30 グ ラム 。 倫 森 晃 39 ア イデ ア に どこ と な く 味 
が ある 。40 グ ラム 。 倫 小沼 進 8@6 い て て っ 。 と 
び け り は 反則 
50 グ ラム 。 倫 佐藤 昌樹 39 ぐ ぇ 一 、 み ご と な 1 
本 背負 い / 音楽 が イマ イチ だ けど ゲー ム は 
最高 レベ ル に 近い っ . グ 感激 の 80 グ ラム 。 欠 
一 姫 二 謙三 四郎 4) り キャラ クタ の か わい さ で 小 
内 が り 。50 グ ラム 。 鈴 木 英 明 42 ほ ほ に 傷 の 
ある よう な キャ ラク タ が 愉快 。 50 グ ラム 。 欠 
ペキン 原 人 2 全体 と し て は いい けど 、 技 が ま 


で も お $ ま の る の まし だ た ね 


だ 荒っぽい 。 教 育 的 指導 の 30 グ ラム 。 欠 SAN 
DWITCHMAN46 技 あり 楽し い パ ズル で 60 
グラ ム 。 氏 CHAM48 は っ きり いっ て これ を 見 
た と き 、 私 は ケ サ 固 め を くら っ た よう に 感激 
し まし た 。 で も 、 バ グ が あっ た の て 注意 の 減 
点 (ヒロ が 直し まし た )。60 グ ラム 。 旬 ISSEI 


側 欠 是 少女 が か わい く て ……。 が 、 ゲ ー ム は 
~ 抜 あり の 段 也 。40 グ ラム 。 倫 .. G2 拡 張 性 の 


な いと ころ が 唯一 の 欠点 。 作 閉 自 身 は お も し 
ろ い けど 作品 は 30 グ ラム 。 劉 どど ん 65 足 払い 
を か けた だ け で 倒れ る な ん て 30 グ ラム 。 今福 
田 真人 69 つ ば め が え し ! 40 グ ラム 。 欠 宮 後 
泰 孝 6) ボ ポー ナス ゲー ム は PASOPIA の 『CROSS 
ING ATTACK』、 メ イン の ゲー ム は PC- 8001 の 
『PARASHOOTER』」 と いう 感じ 。 で も 、 ミ サ 


〈⑦ ニ ウー 会 話 シ リー ズ 〉 お っ つと と お と うと お と うと と (ゆみ ) 立 い や これ は 誰か ガ が 言 つ て いた の を 書い て みた だ だ け で す 。 夫 
と お と う (父親 の こと ) と 弟 と 。 こ ん な も の を 載せ ちゃ つ だ の で 、 お お むつ て ん て ん 、 い や お つ お て ん て ん し ます 。 立 


が ジェ ッ [ 


ボ シ エ ッ ト は 読者 の プロ グラ ム で で き て いま す 。 
キミ の 作 つ だ お も し ろ プ ログ ラム を 熱烈 募集 中 / 


ゲー ム に 限ら ず 、 実用 プロ ブラ ム や いた 
ずら プロ グラ ム な ど な ん で も 結構 で す 。 部 
門 は 次 の ら つ が あり ます 。 

人 @ 1 画面 プロ プラ ハーー- そ の 機種 の 1 
画面 の 表示 限界 内 に 入り きる プロ グ ブラム 
(例え ば PC-8801 な ら 80 字 xX25 行 まで )。 
@ ハ ー フ プロ グラ ハム ーー 1 画面 以上 か 
ら 50 行 以内 の プロ グラ ム 。 

@ シ ョ ー ト プロ グラ ム 部 門 一 原則 
と し て 100 以 内 の プロ グラ ム 。 お も し ろ さ に 
よっ つて は 20 行 くら い の オ ー バ ー は 認め ます 。 
マシ ン 語 の 場合 は 3 に バイ ト 以 内 。 
久本 格 プ ログ ラム 部 門 一 長 さ は 問い 
ませ ん 。 と に か ガ ぐ 編集 部 を 「 お っ 」 と いわ 
せる よう な プロ グラ ム を 望み ます 。 
わび さび プロ グラ ハー 原則 と し て 
1 行 、 ま だ は 1 画面 以内 。 思わ ざ ず 笑 つて し 
まう 奇抜 な ゲー ハム や 、 バ カバ カレ い ジ ヨー 
ク を プログ ラム し じ て ぐ だ さい 。 て わし ぐ は 、 
P88~94 の 記事 を 参 束 し て くだ さい 。 な か 
で も 、 特 に 採用 され る 自信 の ある 人 は 「 絶 
対 採用 され る 自信 が ある !!」 と 大 きぐ 書い 
で ぐだ さい 。 


玉 桐 の ルー ル 


田 ぜ っ だ た だい オリ ジ ナ ル を ーー 盗作 や 


イル が 流れ る の は よかっ た 。40 グ ラム 。 久遠 
藤 新 62 画 面 は 地味 で も ゲー ム と し て は 生き て 
ます ね 。40 グ ラム 。 欠 兼 岩 突 63 さ れい て 楽し 
い 。 50 グ ラム 。 欠 らん まる @⑥6 よ く で き て いる 
けど 、 振り か える こと の で き な い アキ レス は 、 
礼 を 欠い て いる 。 教育 的 指導 で 30 グ ラム 。 人 
堀川 浩司 69 自 作 の ロー ルプ レイ ング 「『ADDM 
ID』 を ファ ミコ ン に 移植 する な ん て ! 70 グ 
ラム 。 お まけ は に ほう びら し C、 テ ク メ ポ 0 
ス で アル バイ ト さ せ て あげ ます 。 欠 YOU?2 ホ 
ント は 本 誌 で 採用 予定 どっ た の に ペー ジ が な 
く な っ て ……。 おもしろい! 70 グ ラム 。 久 
今村 高志 6JR-200 で が ん ば っ て ます 。 40 グ ラ 
ム 。 鍛 財 恒 司 28 座 先生 、 い いか げん に ワン パ 
ター ン は 脱し て くだ さい 。 注意 の 30 グ ラム 。 
念 林 責 弘 80 ど う し て 柔道 に し な いん で すか 。 
40 グ ラム 。 欠 土 谷 之 雄 @2 務 の 道 を 行く も の は 
ギャ ン ブ ル な ど し ま せん ! 30 グ ラム 。 欠 秋 
元 和 89PC-1245 の こと を 考え て あげ る 気持 
ち は 認め た い 。30 グ ラム 。 倫 まさ いち ろ 一 @5 
すばらし い ! だ が 、 あ っ 、 お まえ は !「 ま さい 
ちろ 一 じゃ な いか 。 じゃあ 、50 グ ラム 。 

〔 わ びさ び コ ー ナ ー〕 わび さび の 道 を きわ め 
よう と する も の は グラ ム な ど ジ ャ マ な だ け だ 
と で ぶ 大 先生 が お っ し ゃ いま し た 。 し た が っ 
て 、 で ぶ 大 先生 は 0 グラ ム 。 パ ンプ も 恒例 の 
0 グラ ム 。 最高 点 と 思わ れる CAPS の Ririri く 
ん だ け は 60 グ ラム で 、 あ と の 方 は すべ て 1 人 


ポリ ェ ッ ナー 


20 グラ ム 。 わび きび う 。 


堀川 浩司 ( この 3 人 と も 、 前 回 の グラ ム 大 臣 ) 
YOU の 4 名 の 諸君 。 赤 帯 目指 し て 日 々 精進 ( 
は ぼ ば お よう に 。 


単純 な 移植 は 採用 し ませ ん 。 他 の プロ グラ 
ム を 部 分 的 に 参考 に し だ 場合 は 、 秘 ず 参 考 
文献 を 明記 し て こく だ さい 。 

田 重 投稿 厳 壊 一同 じ プ ロブ ラム を 
他 誌 に も 送る の は 遠慮 し て こ だ さ い (投稿 
を 受け と っ て 3 ヵ月 後 こ らい に は 、 採 用 ・ 
不 採用 の 通知 を 出し ます )。 

田 同 じ プ ブログ ラム を 手もと に 一 投 
稿 作品 は お 返し で きま せん 。 ま た だ 、 採用 し 
だ 場合 その プロ グラ ム の 内 容 に つい て お 
きき する こと が あり ます の で 、 同じ プロ グ 
ラム ハム を セー ブ し た テー プ な ど を 政 ず 手もと 
に 保管 し て お いて こく だ さい 。 

圏 テ ー フ で 投稿 一 羽 ず カセ ッ ト テ ー 
プ に セー ブ し て 送っ て こ だ さ い 。 夫 必ず べ 
リフ ァ イ (まだ は LOAD や ) す る こと @ 
意 の だめ 2 回 以上 同じ も の を セー ブ し て お 
ぐ こ と ファ イル 名 と 機種 名 、 プ ログ ラ 
ム 名 を カセ ツ ト テ ー プ の ラベ ル に 明記 し て 
お こく こと な る べ こ コン ピュ ユー タダ 用 の テ 
ー プ (録音 時 間 の 短い も の ) を 使用 する こと 
一 手紙 を 同封 デー プ と いつ し よ に 
次 の こと を 書い だ 手紙 も 送っ てこ だ さい 。 
⑩ 住 所 ・ 名 前 ・ 職 業 (学校 ・ 学 年 ) ・ 年 齢 
・ 電 話 番号 @ プ ログ ラム を 作 つ だ 機種 名 
と 使用 言語 (機種 に よ つ て は 増設 の オプ シ 


レツ ゼ ッ 


之 回 は 多少 書く こと が 少な い の で 私 は うれ 
し い 。 で も 、 致 命 的 な バブ が ガ 約 3 個 あ り ま し 
だ 。 0 を 次 つつ を の に 、 ご めん ね 。 

@P10 PANIC。 リス ト の うつ ち ら ぢ ヵ所 
で キヤ ラガ 脱 落し て いま し だ 。 行 番号 1 
の “ は “X” に 、 行 番号 5 の ^” は \ 大 ? 
に し て ぐだ さい 。 こ の 2 つ は ゲー ム の 主要 な 
キャ ヤラ クタ で し ただ 。 ご めん な さい 

@P13 「「HE よっ ぱら い 屋 。 oo 
_ 説明 ガ 不 十分 で し た 。 面 クリ ア は 「 右 端 まで 
行け ば 」 で は な ぐ 、' 右端 の 的 に あ た だれ ば 」 で 
し だ 。 す み ま せ ん で す の じ ゃ 。 

@P15 CRACK BALLOON。 リス 


計 
さて 、 黒 帯 と な っ た 沙 合 和彦 、 佐 藤 昌 樹 、 


ポシェ エッ 
バグ 通信 


ヨン や メモ リ 、 モ ー ド 、 ペ ー ジ な ども 正確 
に ) @ ロ ー ド 方 式 を 明記 (な る べ ベ こ デー 
タレ コー ダ の 機種 名 や ポ ボーレート も ) 
プロ グラ ム ( ゲ ー ム ) の 名 前 、 遊 び 方 ・ 使 い 亡 
を な る べく ぐ わ し ぐ 。 プロ グラ ム の 見 どこ 
ろ や 自 慢 な ども 書い て こ だ さ い (書き 方 が 
うま いと 採用 の 可能 性 大 )) な お 、 ア ド ベ ン 
チャ ヤー ゲー ム な ど は 答え も いつ し よ に 。 
@ 変 数 リス ト 、 プ ログ ラム 解説 (マシ ン 語 
の 場合 は 、 プ ログ ラム エリ ア 、 ワ ー ク エリ 
ア 、 メ モリ マッ プ な ども )  @ 参 考 文献 、 
参考 作品 (雑誌 の 場合 は 〇 年 〇 月 号 〇 ペー 
ジ と 明記 。 不 確か な 場合 は 不 採用 に な る こ 
と が あり まず) 

田 封 筒 に は 一 表 に は 応募 する 部 門 を 
赤 で 明記 、 喪 に は 機種 名 と ロー ド 方 式 を 書 
いて ご だ さい 。 


あめ て 先 は 


101 東京 都 干 代田 区 神田 錦町 3-22 
小笠 原 ピ ビル テク フン ノ ポ リス 編集 室内 

1 画面 プロ グラ ム 

パー ジノ [グラ ム 

ショ ヨー ドブ ロン ラム 

本 格 プ ログ ラム 

4 びさ きび ブロ グラ ム 


\ 
ポシェ エッ ツ ト ま 


ト Nn ど より 


ト ガ 不鮮明 な 部 分 が あり ます 。 行 番号 80 の し 
OCATEX. の あと は Y(X) で す 。 
@P2/ "フー フー オリ ン ピ ッ ク 」』-- 行 番号 
260 の W と ら の あい だ の アキ に / を 入れ て くだ 
さい 。 ひ え 一 、 消 えて だ な ん て ク グ 
@P44 SPACE FIGHTER。 行 番号 
290 の な が ほど (cd と 10 の あい だ ) に 黒い 点 
と コン マ が あり ます が 、 上 の 黒い 点 は 無 意 味 
な よごれ で す 。 打 ちこ まな いで くだ さい 。 
@P80、P82 『COSMO PLAZMA。 
と PROJECT15」 は 、 こ の まま だ と ファ 
ミニ リー ベー シッ ク V 3 で は 走り ませ ん 。 黒 い 
パッ ケー ジ の ファ ミリ ー ベ ー シ ッ ク を 使用 レ 
て ぐだ さい 。 な お 、V 3 で 走ら せる に は 、 
COSMO PLAZMA」』 …… 行 番号 20 の C 
LEAR &H/77FF を 取り の ぞ ぐ く 。 
PROJECT15」…… 行 番号 10、20、290、 
370 に 出 て くる メモ リ の アド レス &H77FD…… 
… な ご ど を 、&H6FFD…… の よう に 上 の 2 桁 
を CF に 変え れ ば よい 。 
@P100 ア ジン ケー ト 
ー ル を は の 」 
は り の 」 


「 ハ ガキ に 下 の 応 募 シ 
「 ハ ガキ に 上 の 応募 シー ル を 


第 1 回 コン テス ト は どう で し だ か ゃ 
2 


-(⑨・ 生 父 o ネ 上 第 2 回 も 予定 し て ます の で ビシ パシ 送 つて ネ 。 首 を 長 一 ぐし て 待つ て ます の で 、 ヨ ロ シ フ | (ゆみ ) 
遇 。 @ 


合 今 回 か ら 、 こ の ペー ジ を まとめ 


あこ で に な っ た ゆみ で す 、 どう デ デ 


9 (ゆみ ) 
旬 今 回 か ら こ の ペー ジ を ゆみ ちゃ 
ん が まとめ る こと に な っ た の で いぼ 
く 信 でも も ウ ク で す 。 ず ぞ れ で 、 
あっ ちゃ ん 改め あつ ゆき に し よう 
か な と 思っ た けど 、 よ っ ちゃ ん が 
いる の で や っ ぱり も う 少 し あっ ち 
ん の まま で いた いと 旨い ます 、 
で も だ ん だ ん 気持 ち わ る く な っ て 
く 訪 が な 一 。 もう すぐ 3 上 だ っ て 一 
の に 。 (あっ ちゃ ん ) 


旬 豆 の 中 が 沸騰 し て 、 熱 爆走 し て 、 


つま り ド ッ カ ン の 状態 で し て 、 何 


が な ん だ か わか ら な い 状態 で し て 、 


だ か ら そ の ^ こ ここ この へ ん で か ん べべ 
ん し て くだ さい 。 祝 / 
日 本 一 、 世 界 一 、 銀 河 一 、 
(エイ キチ ) 
移 ボ ご ーー だ あじ ゃ まし まし た 
カッ ト 描 き で ご ぜ ー ま す 。 ポ シェ 
ッ ト 読 者 の みな さま よろ し く お ね 
げ ー し や す だ 。 へ こ へ こ 。 
(知る 人 し か 知ら な い 埼 玉 の 
Smile-Yamamoto ) 
は じ め ま し て 、 私 は まさ いち ろ 
ー 君 で す 。 今回 は な に も し て お り 
ませ ん の で 、 炊 か ら が ん ば る ぞ ー 


_ ポシェ エッ ト の バッ フク ナンバー 情報 を の 
| せ だ いん だ けど 、 残 意 な が ら も うな いそ 
う で す 。 だ だ し 、 書 店 か ら の 注文 用 に ご 
くわ ず か と つて ある そう な の で 、No2 ぐ 
らい な ら 竜 の だ め 書 店 に 注文 し て みれ ば 
手 に 入る か も 。 そ れ は と も ガ ぐ 、 炊 号 は 
月 5 日 発売 で す 。 


テク ノ ポリ スム ッ ク 
ブロ グラ ム ボ シェ ッ ド 95NO。 ? 


欠 発 行人 栃 窪 宏 男 
人 @ 幼 集 人 佐瀬 伸治 


巨人 優勝 、 


っ / と 書け と ゆみ ちゃ ん が お っ 
し ゃ っ た の で あっ た 。 一 お わり 一 

(まさ いち ろ 一 ) 
彰 つ 、 つ い に こ の 目 が 来 て し まっ 
た / 前 回 の ポシェ ッ ト No.2 で ク 
ー が 引退 し て 、 間 も な い の に 、 私 
も ポシェ ッ ト を 引退 する こと に な 
り ま し た 。 ポ シェ ッ ト 創 刊 か ら 今 
まで 、 応 援 し て くれ て あり が と う 。 
(普通 の 大 学生 に 戻る た けち ゃ ん ) 
免 みな さん 初め まし て 、 今 回 か ら 
FM- 7 と PC-8001mkII を 担当 する 
こと に な っ た 新人 の ヒロ と いう 者 
で す 。 今 一 番 し た いこ と は 寝る こ 
と で す 。 お 、 お 願い し ます 。 眠ら 
せく だ さい 。 (ヒロ ) 


名 ロリ コン の 横行 する 編集 部 内 で て 、 


山科 の あっ ちゃ ん が 普通 の H な 写 
真 を みつ め て いる の に 気がつい た 
私 は 、 コ ンピュータ ー と 性 表現 と 
いう 問題 を 考え る に 至っ た 。 例え 
ば 、「 俺 の joy-stick を 試し て みな い 
か ? 」「poke し な いで 。 と ま ら な く 


な っ ちゃ う 。。 な ど で あ る 。 や は り 、 


西欧 文明 の 先端 に 位置 する も の だ 
け に 、 若 干 翻 訳 調 に な る の は 避け 
られ な いと ころ で あろ うか 。 
(よっ ちゃ ん ) 
旬 今 回 か ら ポ シェ ッ ト の 仲間 入り 
し た も え で す 。 慣れ る まで みな さ 
ん に 迷惑 か けち ゃ うと 思う けど 、 
し っ か り が ん ば り ま す の で お お め 
に 見 て や っ て くだ さい 。 


次 号 


まま の し た 。 


E 記 募 シー ル 
ボコ 


ン ケ ー ト 7000 枚 突破 記念 ノ 
た けち ゃ ん ぶつ フー の 

大 学生 に も どる 記念 ノ 
あっ ちゃ ん 30 歳 記念 !? 
バチ バチ パチ …… 


(も え ) 
音 な ぜ か ファ ミ ベ ー 担 当 の K- cha 
n で す 。 フ ァ ミ ベー を 研究 し て 数 ヵ 
用 る 桂 や 。 マテ ペー の ここ と か 
ら ど ん な 質問 に も 答え られ る だ け 
の 知識 と 経験 を 積み 重ね て まい り 
まし た 。 フ ァ ミ ベー ユー ザー の み 
な さま 、 ポ シェ ッ ト の ファ 
プロ グラ ム に 関す る ご 質問 は 、 す 
べ て 私 を ご 指名 の うえ 、 お 電話 く 
だ きい 。 で も 、 ボ ク い そ が し い の 
で 、 か な ら ず 、 ま ず 自 分 で 考え て 
か ら に し て ね / (K-chan) 
音 ぼ く は 今度 か ら 本 誌 テ クノ ボリ 
ス の ゲー ミン グ ワ ー ル ド 担 当 に な 
り ま し た 。 ま た 、 本 誌 で お 会 いし 
ま 選 まう (タカ ) 
を も っ と ボ ポシェット に 登場 し た か 
っ た ヨー。 ボ ポ ボク の ゴー ルデン ウィ 
ー ク を 返せ .〆 (2 ンプ) 
音 今 回 か ら 始 まっ た リク エス ト 移 
植 は いか が で し た ? これ か ら も 
あっ ちゃ ん の 「 ヨ イシ ョ ッ 」 の 量 
に より 、 行 う 予 定 で す 。 
(で ぶ 大 先生 の 付き 人 の T ) 
旬 ニ ャ ンコ の 手 も 借 り た い 。 な ど 
と 時 っ て 、 つ い に パ ンプ ネコ に ジ 
ョ イス ティ ッ ク を 持た せる 事 に 成 
功 し た の で ある 。 キミ は パン プ ネ 
コ の 立体 カラ ー バ バージョン を この 
号 で 知る 事 が 出来 た 倖 せ 者 で ある 。 
よかっ た ネ 。(2000 円 の ユン ケル で 
頭 が 、 ア ワ ア ワ の ハッ トリ くん ) 


85 Na4 は 


AS 
ミ ペ ベ ペー 


日 月 5 日 発売 で す 。 よ ろ し く . 人 


信 押 集 担当 ノ ジャマ 森 
、 参 絹 集 だ あっ ちゃ ん 

信夫 紙 C.G.- キ デザ イン ハッ トリ くん 

大 森 文 デ ザイ ンプ スズ キト シア キ デ ザ イン オフ ィ ス 

代 写 真 プ オサム 

側 イ ラス ト ノ Smile-Yamamoto- ンプ 

価 技 術 プ たけ ちゃ ん ・ エ イキ チ ・ で ぶ 大 先生 の 付き は 人 の T ・ パ ンプ ・K 
-chan・ よ っ ちゃ ん ・ ヒ ロ ・ タ カ ・ も え ・ まさ いち うっ 一 ゆみ ちゃ ん 
倫 フ ィ ニ ッシュ デザ イン ン /( 介 信 女 新 社 

。 令 印 刷 / 凸 版 印刷 株 [ 
⑥ 汚 問 書 店 1985 0 の イラ スト 、 。 ログ ラム 
の 無断 転載 を 禁じ ます 。 


1 1 1 | III 了 CE 衝 き 湯 北 さ W 信 川中 1 1 1 | 『 
- 三 駅 前 通信 下 取 販 売 ・ 買 取 四 琶 の 2 モエ 肥 


学 計 0 人 マイ コン ワー プロ 周辺 機器 ツ フ ト 書 籍 な ど ま と め て 
和佐 一 テー 


N 上 ご PC-9801M2C 新 同 ) 
PC-9801F 2 新 同 ) M〆-2200 
ピロ ご -9801 X1.X1C,X1D( 人 本体 ,. モ ニ マ ー) 
PC-8801MKII SR30( 新 同 ) M〆-/00 シ リー ズ 
PC-8801MKIi 10.20.30 M〆-80K、C シ リー ズ 
ご 〇 =880 . 之 パソ ピア 16( カ ラー モニ ター 他 付 ) 
PO 〇 -8001MK II SR( 新 同 ) パソ ピア CCPA -7010) 
PC-8001MKII 、 ) パ ソソ ピ アア 
立 MB-16003(6000 シ リー ズ ) 
パー ウツ リヴ マス ダーJW 9-70 ワ 9- 
PC-6001MK II SR( 新 同 ) 通 FM- フ 
PC-6001MKII _ FM-8 
PC-6001 6 JR-200 
ピロ C-PR-201(136 厨 プリ ンダ) APPLE JJ-P し US 
PC 〇 -8822( 但 字 プ リン タ ) 作 FFE 選民 ( 〇 
ss | SL チチ 
〇 GP-550F( 裳 字 プ リン ) 
導 滑 040 <400 モ ニ 人 - つ FP-1100 
Z ル リーン ノ 七 M- ら 


シヤ セー デブ の 靖 和 2 | 6 プリ ンタ 14. 800 ぁ FH 古 ソ フト 大 量 展示 / 


@ 中 古 マ イコ ン 和 在庫 300 台 ※ そ の 他 在 庫 は 、 豊 富 に ご ざい ます 。 “ 「 
の お 買得 中 古 マ イコ ン 本体 周辺 


下 取 ・ 売 却 を お 急ぎ の 方 は 直接 現品 を 
宅急便 な ど で 下 記 へ お 送り 下さ い 。 ee き # し た / 
ポポ ] @ お 申し 込み の 方 は 60 円 切手 2 


@ 下 取り ご 希望 の 場合 は 、 一 週間 以内 に 、 ご 希望 商品 と 下 取 分 代 

金 差し 引き の 請求 書 を お 届け 致し ます 。 
枚 を 同封 の 上 、 当 社 中 古 マ イ 
コン リス ト 係 へ 御 請求 下さ い 。 


社 


(MM ぐ J 藻 | 


@ 売 却 ご 和希 望 の 場合 は 、 現 品 が 着き 次 第 、3 日 以内 に 高価 買取 の 
代金 を お 届け 致し ます 。 


@ 下 取り ・ 売 電 ご ちら の 場合 も 周辺 機器 、 書 籍 まで 全て 高価 で お 
引取 り 致 し ます の で まとめ て お 送り 下さ い 。 


地 要 記載 パソ コソ ァ デス 全 機 種 対応 
ッ レ ジッ ト OK ア 稚 あ 再 , - 
渋谷 駅 前 店 に て 展示 中 / * = 


全国 配送 


パソコン デス ク の お 申込 方法 


業務 用 し て 開 和 計 | | 強度 バツ グン | 移動 自由 (2 爺 久 ) 


今 す ぐ こ ご 希望 商品 名 と 住所 ・ 氏 名 ・ 電 話 番号 を 明記 の 上 、 
代金 を 同封 し て 現金 書留 に て お 送り 下さ い 
到着 後 3 日 前 後 で 商品 か お 手もと に 届き ます な お 、 
お 急ぎ の 方 は 今 すぐ お 電話 で お 申込 下さ い 草 | 2 月 々 Y3800x12 回 | 
クレ ジッ ト て お 求め の 場合 は お 電話 に て 受付 て お り ま す =、、930( 高 さ ) 5 =、 930( 高 さ ) 還 0( 幅 ) x230( 高 さ ) 行 
600( 幅 ) xn( ) X 740( 奥 行 1200( 幅 ) メロ ( ヶ ) X 740 (奥行 ) 300( 幅 ) X-n0( 2 1 x 740 (奥行 ) 
| sn わあ な た の マイ コン を 下 取 し ます / : 
@⑥ マ イコ ン の お 求め 、 下 取 、 売 却 は 今 すぐ お 電 て / | CO 
ポ 、 完 鹿 すく 品 | 億 ア 見 積 申込 は お ハガキ で / 
ア @Y | | 〒!50 開 | | イト | [ 
ーー" 珠 2 京 品名 品番 
ボー 上 3 没 人 '『a の 3 
に 2 ルフ 2 SN メー カー 品名 
* セイ 区 人 名 る 
イコ ツリ 台 通 も 且 - | ミ : 
| 時 1 ル 塊 nA 
〒150 東京 都 波谷 区 道玄坂 2-3-2 大 外 ビ ル 容 03(463)4455  : | 係 現金 クレジット の 別 


| 見積 お 申込 み の 万 | 新品 中古 品 購 入 、 下 取り ご 和希 望 の 万 は 、 この 上 人 に 人 を ご の 上 お 送り 下さ 。 見 積 と 便利 で 簡単 お お 取引 き 記法 の 説明 書 を お 送り 致し ます 。 


、w 


Epicurus Baron | 小 も 較 


2 ノレ ト 
1) 了 RM 2)SE6 593JF6 % 
ド r- 117702 (960odboe) 


7 
9 》 ア 誠 2 / "の アゲ デメ 


ド に 240 


ァ ド ベン チャ ー ゲ ー- ム 。 4 


大 変 ど び / バ ー ス キン グ が 我々 の 世界 を 核 戦争 に まき こも うと し て いる 
の だ 。 一 刻 も 早く この 危機 を 救 わ ね ば な ら な い 。 
急げ 、X-07 号 、 時 間 i は も 5 な い 。 - ノ 


1 fR. と 。 
ン ち で 6 ゃ 
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字 宙 海賊 船 ワ イア ー ド は 、 今 ひと つの 仕事 を 終 

え 、 字 宙 を る きま よっ て いた 。 ある と き 、 永遠 の 生命 

与え る と いう エビ ル パ ワ ー が マリ ア 星 に 眠っ て いる 

こと を 知り 、 再び ワイ アー ド は 、 エビ ル パ ワ ー を 求 

め て 未知 の 宇宙 へ 旅立っ て いっ た 。 

弄 FM-/NEW7・:77 テ ー プ 版 ・ 
\S55000 

園 FM-//・FM-7/NEW7 


3.5 イ ンチ 2D \8000 
5 イン チ 2D 半 8000 


ISX ミス ター ハナ フタ 

の り 。 岩 あり 、 木 あり 、 川 あり 。 も ちろ ん 敵 も ひょう きん タヌキ が 音楽 に あわ せ て 持 札 を 配り まる タ スキ に 気 を ゆる 

も ジー プ に 搭載 め て は ダメ を こ は 、 勝 負 の 世界 。 コ ンピュータ の お し ゃ べり と 、 画 面 メ 
| ッ セ ー ジ に 従っ て 進行 する 花札 コイ コイ 。_ 


敵 の 基地 まで 長い 道 
だ まっ て いな い 。 こ ちら 
の 機関 銃 で 応戦 だ / 
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MSX・16K・ テ ー プ 版 学 3。800 PC-6001Mk II /SR・PC-6601/SR・ テ ー プ 版 学 4,200 
マー ク は マイ クロ ソフ ト の 商標 で す 。 3.5 イ ンチ ティ スク 版 学 4 ぅ 900PC-6601SR 
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